projects
/
fleet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
MarinaTest: use expectNorthFifoExactly()
[fleet.git]
/
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