|
in reply to How's your Perl?
6 of 12
Exercise 1: Create an array @x such that changing $x[0] also sets $x[1] to the same value
$[=1;@x=();
Exercise 2: Given a pre-declared function "foo", write a code snippet that invokes it in an infinite loop; in 10 chars
{foo;redo}
Exercise 4: Dump core in 6 chars
dump()
Exercise 5: Create a static variable lexically scoped to a sub, and no wider than that. It's ok if it blows up under recursion
sub foo{my $static if 0}
Exercise 6: Create $x, $y such that $x eq $y && $$x ne $$y
$x=\1;$y="$x"
Exercise 8: Create $foo such that ($foo^=0)++ eq $foo++
*foo=*|;$|=1;
|
|
