13:05 >perl 1052_SoPW.pl
INT at 1052_SoPW.pl line 13.
        eval {...} called at 1052_SoPW.pl line 13
        main::g() called at 1052_SoPW.pl line 9
        main::f() called at 1052_SoPW.pl line 6
In g(), after sleep
After f()

13:05 >