my $hideflag=`attrib $src`; if ( $hideflag=~m/^ H/ ) {