GetOptions('file|f=s' => \$opt_file) or die('useage...');