12:39 >perl 844_SoPW.pl
original foo(parent)
modified foo(child)
original foo(the end)

12:39 >