chomp( my $dir = <STDIN> );