Select Code to Download

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

    return $result;
}

Result:
BAT
...
EAT
FAT
RAT