GetOptions {
'outdir=s'            => \$out_dir,
}

##</code><code>##

perl script.pl --outdir "D:\My-Folder"