bee2-selectmap/remote_run.pl

   1 #!/usr/bin/perl
   2
   3
   4 $foo = 5;
   5 $f=0;
   6 while($f<$foo)
   7 {
   8 `echo "1234567890" > /dev/selectmap1`;
   9 `head -c11 /dev/selectmap2 >> transcript`;
  10 `echo '\n' >> transcript`;
  11 $f = $f+1;
  12 }
  13