my @lines = 1..3;
my $result = do { local $" = "\n"; "@lines\n" };
die $result;
[download]

MJD says you can't just make shit up and expect the computer to know what you mean, retardo! I run a Win32 PPM repository for perl 5.6x+5.8x. I take requests. ** The Third rule of perl club is a statement of fact: pod is sexy.