Help for this page

Select Code to Download


  1. or download this
    my (@dir, @other);
push @{ -d ? \@dir : \@other } for readdir DH;
  2. or download this
    my (@dir, @other) = part [ -d, ! -d _ ] readdir DH;
  3. or download this
    my (@dir, @other) = part [ -d, 1 ] readdir DH;