Help for this page

Select Code to Download


  1. or download this
    if (-d $file && ! -l $file)
    
  2. or download this
    die "Syntax: $0 <dir>" unless @ARGV == 1 &&
        (-d $ARGV[0] && ! -l $ARGV[0]);