die "Syntax: $0 " unless @ARGV == 1 && (-d $ARGV[0] && ! -l $ARGV[0]);