cp /home/wbill/lazarus/file1  file2 .

##</code><code>##

#! /usr/bin/perl
use strict;
use warnings;

my @FILES = ('file1',' file2');
my $path = "/home/wbill/lazarus";

foreach my $this_file ( @FILES ) {
  `cp $path/$this_file .`;
}