in reply to First word
you could also use split (There's more than one way to do it)
Update: at first, it sounds a good solution, but I'm not sure after all...$y=split(/\s/,$x)[0];
|
---|
In Section
Seekers of Perl Wisdom