http://www.perlmonks.org?node_id=981382


in reply to regex needed

my ($before, $after) = split /\$\$/, $line, 2;

[download]
Perl 6 - the future is here, just unevenly distributed

In Section Seekers of Perl Wisdom