Hi,
Maybe try:
if ($file =~/\..*\./) {
...
}
I just checked it. It works.
Joseph
Marco Centemeri wrote:
> Hello All,
> I'd like to know if a file name is like namefile.ext (only one dot in the name)
> or namefile.xxx.z.ext (more than one dot in the name).
> I tried with regex:
>
> $fil
Marco Centemeri wrote:
>
> Hello All,
Hello,
> I'd like to know if a file name is like namefile.ext (only one dot in the name)
> or namefile.xxx.z.ext (more than one dot in the name).
> I tried with regex:
>
> $file1='doctobepublish.new.pdf';
>
> if ( $file1 =~ /\.{2,}/ ) { print "KO filen
Hi
$file1='doctobepublish.new.pdf';
if ($file1 =~ /\.[^\.]*\./)
{
print "Multiple Dots!";
}
else
{
print "Single Dot!";
}
-aman.
-Original Message-
From: Marco Centemeri [mailto:[EMAIL PROTECTED]]
Sent: Monday, December 16, 2002 12:41 PM
To: Perl Beginners Mailing List
Subject: again a
