mirror of
https://github.com/Telecominfraproject/wlan-testing.git
synced 2026-01-09 22:01:50 +00:00
10 lines
126 B
Perl
Executable File
10 lines
126 B
Perl
Executable File
#!/usr/bin/perl
|
|
|
|
my $i = 0;
|
|
while (1) {
|
|
`/home/lanforge/telnet.expect`;
|
|
print "Completed telnet connection $i\n";
|
|
$i++;
|
|
}
|
|
|