chomp( @list = <STDIN> );
print "Item: ", ++$count, ", Value: $_\n" foreach @list;