Made room to specify the PlanetLab prefix (pl or ple) on the command line.

diff --git a/qaapi/qa/tests/node/vsys_launch.pl b/qaapi/qa/tests/node/vsys_launch.pl
index 671b551..46a4045 100755 (executable)
--- a/qaapi/qa/tests/node/vsys_launch.pl
+++ b/qaapi/qa/tests/node/vsys_launch.pl
@@ -1,7 +1,15 @@
 #!/usr/bin/perl
 use strict;
 
-my $prefix="pl";
+my $prefix;
+
+if ($#ARGV>0) {
+               $prefix=$ARGV[0];
+               print "Setting prefix = $prefix\n";
+}
+else {
+       $prefix="pl";
+}
 # my $prefix="ple";
 
 my $slice="$prefix"."_netflow";