in reply to weird print results

foreach my $line (@results)

[download]
Sample data for @results would be handy.

--shmem 

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}

Replies are listed 'Best First'.
Re^2: weird print results
by Ieronim (Friar) on Jul 01, 2006 at 18:06 UTC
[reply]
      There are 10 snippets there. Take the guesswork out and show us!
[reply]

In Section Seekers of Perl Wisdom