Simple script to find files with certain names

[melsalhy]

Hello all,
Is there a simple perl script to search a certain directory (folder) on the server and look for and list files whose names contain a certain string that the user chooses?

There used to be a script out there called "Site File Finder" but it is no longer available. Any help would be greatly appreciated.

Thanks and regards. :)

[jeffmott]

$a_certain_string = 'foo';
chdir '/a_certain_directory' or die $!;
@names_that_match = grep { /$a_certain_string/ } glob '*';

[melsalhy]

Thank you for your reply post but as a newbie, I am merely at the cut-n-paste stage so far! Would it be too much to ask you to kindly provide the actual (and complete) script in its entirety i.e. starting at the !#usr/bin/perl and all the way?

Thanks and best regards.