Help for this page

Select Code to Download


  1. or download this
    $ perldoc -f rmdir
           rmdir FILENAME
    ...
                   that directory is empty.  If it succeeds it
                   returns true, otherwise it returns false and sets
                   "$!" (errno).  If FILENAME is omitted, uses "$_".
    
  2. or download this
    s**lil*;  $*=join'',sort split q**;  s;.*;grr; &&s+(.(.)).+$2$1+; $; =
    qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)