Select Code to Download

Use of uninitialized value in concatenation (.) or string at noname1.p
+l line 23.

use strict;
use warnings;
...
    $string =~ s/\s+\z//ms;
    print "$string\n";
}

abc