#!/usr/bin/perl
use strict;
use warnings;
my $opt_f = shift;
# Do your option checking here...
`findfile.exe $opt_f`;