in reply to split giving me a splitting headache
/.*/ is greedy. So all you have to do is
and Bob's your uncle. Unless there is no period. You'll have to handle that case separately.($x, $y) = /(.*)\.(.*)/;
|
---|
In Section
Seekers of Perl Wisdom