Re^5: Printing all the files that have both ".rtf" and ".ftp" by searching recursively in a given directory

Are you saying you have a file named something like "foo.rtf.ftp" or "foo.ftp.rtf"? Just change the name strings to match your bizarre file names:

use warnings;
use strict;
use File::Find::Rule;
use Data::Dumper;

my @files = File::Find::Rule->file()
                            ->name( '*.rtf*.ftp', '*.ftp*.rtf' )
                            ->in( './' );
print Dumper(\@files);
[download]

Comment on Re^5: Printing all the files that have both ".rtf" and ".ftp" by searching recursively in a given directory Download Code

Replies are listed 'Best First'.
Re^6: Printing all the files that have both ".rtf" and ".ftp" by searching recursively in a given directory by Anonymous Monk on Apr 12, 2011 at 19:16 UTC
I have a file with name foo.rtf and foo.ftp ,I only want to print such files with both extensions	[reply]
Re^7: Printing all the files that have both ".rtf" and ".ftp" by searching recursively in a given directory by Anonymous Monk on Apr 12, 2011 at 19:27 UTC
I tried to use thefollowing but it is also not helping.. `my @files = File::Find::Rule->file() ->name( qr/\.(rtf&ftp)$/ ) ->in( './' );` [download]	[reply] [d/l]