gdb -p 1234

##</code><code>##

(gdb) where
#0  0x55000402 in ?? ()
#1  0x00c75420 in __nanosleep_nocancel () from /lib/tls/libc.so.6
#2  0x00c7526f in sleep () from /lib/tls/libc.so.6
#3  0x080dacea in Perl_pp_sleep ()
#4  0x080a6044 in Perl_runops_standard ()
#5  0x0806103e in S_run_body ()
#6  0x08060e36 in perl_run ()
#7  0x0805e359 in main ()