system('cp',<source/*>,'dest/.') and die

##</code><code>##

my @test_files = <*.txt>;

##</code><code>##

my @files = glob( $foo );