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.zzzzz.ext (more than one dot in the name).
> I tried with regex:
>
> $file1='doctobepublish.new.pdf';
>
> if ( $file1 =~ /\.{2,}/ ) { print "KO filename not properly formatted"; }
> else { print "OK filename is good"; }
>
> This doesn't work and the match is true only if the two dots are consecutive.
>
> doctobepublish.new.pdf =~ /\.{2,}/ doesn't match
> doctobepublish..new.pdf =~ /\.{2,}/ match
>
> My idea, probably wrong, is that regex process scan all the string and try
> to match all the possible so
>
> doctobepublish.new.pdf =~ /\.{2,}/ should match
> anotherdoctobepublish.pdf =~ /\.{2,}/ should not match
>
> May anybody help me to solve the problem and to understand better how regex
> works?
> I've already read perlquik and perlre but some points are still foggy!
>
> Thanks a lot
> Marco Centemeri
>
> --
> ************************************************************
> Eng. MARCO CENTEMERI
>
> Telecommunication and Peripherals/Automotive Groups
> Audio & Automotive Division
> Automotive Business Unit
> Bosch Product Engineer
>
> STMicroelectronics Srl Tel: +39.039.603.5784
> 20041 Agrate Brianza - Italy Fax: +39.039.603.6343
> Via C. Olivetti, 2 Mobile: +39.0348.8861577
> Building F11 [EMAIL PROTECTED]
> ************************************************************
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
