$ cat test.txt bla. fasel . foo . bar. $ perl -e ' use IO::String; $str=`cat test.txt`; $fh = IO::String->new($str); $/="."; print "$_|" for <$fh>' bla.| fasel .| foo .| bar.| |
print+qq(\L@{[ref\&@]}@{['@'x7^'!#2/"!4']});
In reply to Re^2: extracting lines from a string - while ignoring the \n character
by codeacrobat
in thread extracting lines from a string - while ignoring the \n character
by legin
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |