13:05 >perl 1052_SoPW.pl
INT at 1052_SoPW.pl line 7.
        eval {...} called at 1052_SoPW.pl line 7
After f()

13:07 >