Select Code to Download

#!/usr/bin/perl

use warnings;
...
  # stuff
  return qw{one two three};
}

one
two
three
four

one
two
three
four
five

three
one two