X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy%2FUtils.pm;h=1dc25e113d544a00c2585a00d7a9d1751a604642;hp=4f2580c98692248283aa1fd8347aeba4c8dbb6c7;hb=9259a5ce6aca71c248970cb7659996623d0c1163;hpb=e6f90536b01635b196212bc09fbd7477d5b01f0e diff --git a/lib/ZOOM/IRSpy/Utils.pm b/lib/ZOOM/IRSpy/Utils.pm index 4f2580c..1dc25e1 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 at start and ends of a field +sub trimField { my $field = shift; $field =~ s/^\s+//;