- or download this
wilber:~$ gdb /usr/bin/debugperl
GNU gdb 6.4-debian
Copyright 2005 Free Software Foundation, Inc.
...
#9 0x00000000004239f1 in perl_run (my_perl=0x6d1010) at perl.c:1919
#10 0x000000000041d2ca in main (argc=3, argv=0x7fffffbfd848,
env=0x7fffffbfd868) at perlmain.c:98
- or download this
wilber:/usr/src/perl-5.8.8$ gdb /usr/bin/debugperl
GNU gdb 6.4-debian
...
0x00002aaaaae54162 in __read_nocancel () from /lib/libpthread.so.0
(gdb) p Perl_Iorigenviron_ptr
$1 = {char ***(PerlInterpreter *)} 0x57c780 <Perl_Iorigenviron_ptr>
- or download this
$h=$ENV{HOME};my@q=split/\n\n/,`cat $h/.quotes`;$s="$h/."
."signature";$t=`cat $s`;print$t,"\n",$q[rand($#q)],"\n";