Select Code to Download

$answer =~ s/\s+$//g;
$answer =~ tr/\015//d;

#!/usr/bin/perl
use strict;
use warnings;
...
          }
     }
}