my $direct;
chomp($direct = $ARGV[0]);
chdir($direct);