strip — trim leading and trailing whitespace
strip is available in Interchange versions:
4.6.0, 4.6.0, 4.8.0, 5.0.0, 5.2.0, 5.4.0, 5.6.0, 5.8.0, 5.9.0 (git-head)
Interchange 5.9.0:
Source: code/SystemTag/strip.coretag
Lines: 20
# Copyright 2002-2007 Interchange Development Group and others
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version. See the LICENSE file for details.
#
# $Id: strip.coretag,v 1.4 2007-03-30 23:40:49 pajamian Exp $
UserTag strip hasEndTag
UserTag strip PosNumber 0
UserTag strip Version $Revision: 1.4 $
UserTag strip Routine <<EOR
sub {
local($_) = shift;
s/^\s+//;
s/\s+$//;
return $_;
}
EOR