Help for this page

Select Code to Download


  1. or download this
    use File::Copy;
    my @FILES = ('file1', 'file2');
    copy( "/home/wbill/lazarus/$_", '.' ) foreach (@FILES);