1234567 #!/usr/bin/env perluse warnings; use strict;use rlib '.'; use Helper;my $test_prog = prog_file('gcd.pl');run_debugger("$test_prog 3 5", 'cont.cmd');done_testing();
#!/usr/bin/env perl
use
warnings;
strict;
rlib
'.'
;
Helper;
my
$test_prog
= prog_file(
'gcd.pl'
);
run_debugger(
"$test_prog 3 5"
,
'cont.cmd'
done_testing();