###-- Tried and does not work => File::Find::find({wanted => \&wanted}, $fs_input, $size_input ) ; --###
}

sub wanted {

    ( $fs_input ) = shift @_ ;
    print "FSINPT:\t",$fs_input,"\n";
    for my $key ( sort keys %mounts ) {
        if ( $fs_input eq $key ) {
            @mounts =
                grep {$fs_input} @{ $mounts{$key} } ; 
        }
    }    ###-- End For my key --###

    if ( scalar @mounts > 0 ) {
        die "To bad, your dead",
            join( ":", @mounts ),
            "\n\nI said your dead $!"
            ;
    }
    else {
        ( $size_input ) = shift @_ ;
        my ($dev,$ino,$mode,$nlink,$uid,$gid);

         (( $dev,$ino,$mode,$nlink,$uid,$gid ) = lstat($_) ) &&
          ( $dev >= 0 ) &&
          !( $File::Find::prune |= ($dev != $File::Find::topdev ) ) &&
          ( int(((-s _) + 1023) / 1024 ) > 26367 ) &&        
           ###-- only works when a hard-coded value is used --###