Select Code to Download

use strict;
use Getopt::Std;
...
our $opt_v;
print join(':',@ARGV), "\n";
getopt('v');

$ myscript.pl -v < data.txt
-v
opt_v =