in reply to How's your Perl?
- perl -e"sub t{ \@_ }; $s='this'; *x = t $s, $s; $x[0] = 'that'; print join' ',@x;"
- perl -e"foo while1" or perl -e"{foo;redo}"
-
- perl -e"$foo = [{1=>1}, 'foo']; print \$foo->{1}, \$foo->[1]; "
- ?
- ?
- ?
- ?
- ?
- ?
- perl -e"$foo = \\1; print eval(q[$$foo]), eval(q[$$foo + 0])"
- ?
- ?
- ?
- perl -e"sub STDOUT{\*STDOUT}"
- Bonus perl -e"print \undef; sub foo{} goto +foo"
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Re: How's your Perl?
by hessef (Monk) on Oct 27, 2003 at 15:37 UTC | |
by hardburn (Abbot) on Oct 27, 2003 at 16:43 UTC | |
Re: Re: How's your Perl?
by xmath (Hermit) on Oct 27, 2003 at 10:31 UTC | |
by BrowserUk (Patriarch) on Oct 28, 2003 at 02:30 UTC | |
by xmath (Hermit) on Oct 28, 2003 at 10:32 UTC | |
by BrowserUk (Patriarch) on Oct 28, 2003 at 12:45 UTC | |
by xmath (Hermit) on Oct 28, 2003 at 18:27 UTC |
In Section
Meditations