title: Pattern matching not working while copying files
body: <p>I want to copy some specific files form a folder to another folder. The source folder is having these kind of files:</p>
  
  <p>Example:</p>
  
  <pre><code>abc_key_in.rsb
  abc_key_in_at.rsb
  abc_key_in.kwd
  abc_key_in_at.kwd...
  </code></pre>
  
  <p>I have to copy files which are having <code>abc_key_</code> as prefix and <code>.kwd</code> as an extension....</p>
  
  <p>I have tried this code but pattern matching is not working...</p>
  
  <pre><code>foreach $filename(@files)
  {   
  
     if($file_name =~/abc_key_*.kwd/) &lt;--- Not working
     {
          print $file_name;
          cp($file_name,$dest_dir.$file_name) #or die "Failed to copy $file_name :$!\n";
      }
   }
  </code></pre>