perl syntax

[Bouarich, R. <Red...@co...>]

I want to write in a file using a perl program;i'm using this but it doesn't
seems to work, can anyone know how does it work?
thanks.
reda.


use lib '.';
use lib 'lib';
use Net::LDAP;
use Shell qw(mkdir );
use File::Copy ;
use POSIX;  

           
$user_name='tiger';
$resource='mcc-resource.dat';
$path=("/usr/reda/PERL").("/").("$user_name").("/");
chop $path;
mkdir ("$path");
open (FILE,">$path/$resource");
copy ("$whathavetobecopied", "/usr/reda/PERL/tiger/mcc-resource.dat");