Select Code to Download

use File::Slurp qw<slurp>;

...

# prepend "ITEM " to the rest and print
print "ITEM $_" for @items;