What's this:
% cat /tmp/naughty
$line = "This should really work out better than it seems to be doing.";
formline("~~ ^<<<<<<<<<\n", $line);
print $^A;
% perl /tmp/naughty
Bizarre copy of FORMLINE in print at /tmp/naughty line 3.
--tom
Tom Christiansen Perl Consultant, Gamer, Hiker tchrist@mox.perl.com
English is a 5-tuple ... --dmr
% cat /tmp/naughty
$line = "This should really work out better than it seems to be doing.";
formline("~~ ^<<<<<<<<<\n", $line);
print $^A;
% perl /tmp/naughty
Bizarre copy of FORMLINE in print at /tmp/naughty line 3.
--tom
Tom Christiansen Perl Consultant, Gamer, Hiker tchrist@mox.perl.com
English is a 5-tuple ... --dmr