sub fileop {
    #set the right permissions based on if a file or a directory
    #only set permissions of the mode is set
    chmod oct($opts{'filemode'}), $_ if -f && $opts{'filemode'};
    chmod oct($opts{'dirmode'}), $_ if -d && $opts{'dirmode'};
    print $File::Find::name . "\n" if $opts{'verbose'} && (-f || -d);
}