Re: How's your Perl? (II)

13-th (xmath says that this is a cheat)
use subs 'and';sub and :lvalue {$_};

9-th
$foo="\n0";$*++;

7-th
*foo = \1;

6-th
sub f{\@_}; *foo = f($_,$_);

2-d
*foo=\pos;

1-st
$foo = *_;

Update: 2-nd and 9-th added

Update: 10-th REMOVED, because it use the same method as 9-th

Comment on Re: How's your Perl? (II) Select or Download Code

Replies are listed 'Best First'.
Re^2: How's your Perl? (II) by xmath (Hermit) on Jul 21, 2004 at 21:44 UTC
13-th: Heh, clever, but it doesn't actually make the predicate true, it just makes the example method of checking your solution work. Update: and subs.pm is a module ;-)	[reply]