X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy%2FUtils.pm;h=0fc656aed69792025273e3a51f6a9d1f83b3fabe;hp=4f2580c98692248283aa1fd8347aeba4c8dbb6c7;hb=3d8efa47efc70e2d04f5c8325b2b72f0612f0dc2;hpb=e6f90536b01635b196212bc09fbd7477d5b01f0e diff --git a/lib/ZOOM/IRSpy/Utils.pm b/lib/ZOOM/IRSpy/Utils.pm index 4f2580c..0fc656a 100644 --- a/lib/ZOOM/IRSpy/Utils.pm +++ b/lib/ZOOM/IRSpy/Utils.pm @@ -9,6 +9,7 @@ use Scalar::Util; use Exporter 'import'; our @EXPORT_OK = qw(utf8param + trimField isodate xml_encode cql_quote @@ -104,8 +105,8 @@ sub isodate { $year+1900, $mon+1, $mday, $hour, $min, $sec); } -# strips whitespaces and start and ends of fields -sub trimFields { +# strips whitespaces and start and ends of a field +sub trimField { my $field = shift; $field =~ s/^\s+//;