Skip to content
Snippets Groups Projects
Commit 5c7271c9 authored by Kevin Atkinson's avatar Kevin Atkinson
Browse files 

Don't hard code proj and exp name.
parent 45eeacd6
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 4 additions and 4 deletions
pelab/init-by-file.pl
+ 4
− 4
View file @ 5c7271c9
...@@ -12,8 +12,8 @@ open(FILE, "<".$filename) or die("Cannot open $filename\n"); ...@@ -12,8 +12,8 @@ open(FILE, "<".$filename) or die("Cannot open $filename\n");
while ($line = <FILE>) while ($line = <FILE>)
{ {
$line =~ /^10.0.0.([0-9]+) ([0-9.]+) ([0-9.]+) ([0-9.]+) [0-9.]+$/; $line =~ /^10.0.0.([0-9]+) ([0-9.]+) ([0-9.]+) ([0-9.]+) [0-9.]+$/;
print("/usr/testbed/bin/tevc -e tbres/pelab-generated now elabc-elab-$1 modify dest=$2 bandwidth=$3\n"); print("/usr/testbed/bin/tevc -e $proj/$exp now elabc-elab-$1 modify dest=$2 bandwidth=$3\n");
print("/usr/testbed/bin/tevc -e tbres/pelab-generated now elabc-elab-$1 modify dest=$2 delay=$4\n"); print("/usr/testbed/bin/tevc -e $proj/$exp now elabc-elab-$1 modify dest=$2 delay=$4\n");
system("/usr/testbed/bin/tevc -e tbres/pelab-generated now elabc-elab-$1 modify dest=$2 bandwidth=$3"); system("/usr/testbed/bin/tevc -e $proj/$exp now elabc-elab-$1 modify dest=$2 bandwidth=$3");
system("/usr/testbed/bin/tevc -e tbres/pelab-generated now elabc-elab-$1 modify dest=$2 delay=$4"); system("/usr/testbed/bin/tevc -e $proj/$exp now elabc-elab-$1 modify dest=$2 delay=$4");
} }
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment