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: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to