perl

At some point, if you use perl enough, you'll encounter the following error message: Use of uninitialized value in concatenation (.) or string at ./progname.pl line #. While it does not…

A trim() function should be native to perl, but since it isn't, this will have to do. sub trim { my @vals=@_; for (@vals) { s/^s+//; s/s+$//; } return wantarray ?…