my @ARGV ="C:/Main/work"; 
die "Need directories\n" unless @ARGV;