Select Code to Download

use File::SPec::Functions 'rel2abs';
my $abspath = rel2abs("produce_items.txt");

use FindBin;
my $abspath = "$FindBin::Bin/produce_items.txt";