#line 17 our $opt_file; GetOptions('file|f=s') or die('useage...'); print "file: $opt_file\n";