sub fileop {
    if( -f and $opt_filemode ) {
        chmod oct( $opt_filemode ), $_;
    }
    elsif( -d and $opt_dirmode ) {
        chmod oct( $opt_dirmode ), $_;
    }
    else {
        return; # avoid falling thru to print()
    }
    print $File::Find::name, "\n" if $opt_verbose;
}