Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: How's your Perl?

by ccn (Vicar)
on Mar 27, 2004 at 23:07 UTC ( #340317=note: print w/replies, xml ) Need Help??


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;

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://340317]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (7)
As of 2018-08-14 13:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Asked to put a square peg in a round hole, I would:









    Results (150 votes). Check out past polls.

    Notices?