in reply to QuickPerl: a step up from -e
Why not just
#!/usr/bin/perl package Run::Perl; print "Enter some perl: "; while ($_=<>) { chomp; exit unless $_; eval; print "\nEnter some perl: "; }
tachyon
s&&rsenoyhcatreve&&&s&n\w+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: QuickPerl: a step up from -e
by Abigail (Deacon) on Jul 05, 2001 at 02:06 UTC | |
|
Re: Re: QuickPerl: a step up from -e
by John M. Dlugosz (Monsignor) on Jul 05, 2001 at 02:14 UTC | |
by tachyon (Chancellor) on Jul 05, 2001 at 02:39 UTC | |
by John M. Dlugosz (Monsignor) on Jul 05, 2001 at 06:04 UTC |