use File::Basename qw( basename );
    my @noshow= ( ".", "..", basename(__FILE__) );