perl -le '$_="foo.bar.baz"; print /^(.*?)\./' [download]
print+qq(\L@{[ref\&@]}@{['@'x7^'!#2/"!4']});
In reply to Re: split...or better? by codeacrobat in thread split...or better? by mikejones