I want to match files that have no period in their filename.
if( $_ =~ /[^.]/) {
if( $_ !~ /\./) { or unless( /\./ ) {
-- Simon Oliver
_______________________________________________ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs