$ perl 1174098.pl
ok 1
1..1