On 2010-09-23 00:02, John W. Krahn wrote:
s/^\s+//, s/\s+$// for $option, $sourceID, $targetID;
Variant:
s/\s+\Z//,
s/\A\s+//,
for $option,
$sourceID,
$targetID;
(I like to remove the trailing whitespace first.)
--
Ruud
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
