Select Code to Download

#!/usr/bin/env perl

...
sub greet {
    print greeting(shift), "\n";
}

#!/usr/bin/env perl

...
}

1;

use strict;
use warnings;
...
is $resp, "Hello Monk\n", 'Got correct output in STDOUT.';

done_testing();