Help for this page

Select Code to Download


  1. or download this
    @dead = grep { ! defined( $keep{$_} ) &&
        ( -d $file ? rmdir : unlink ) && $_ } @files;
  2. or download this
    @dead = grep { ! defined( $keep{$_} ) &&
        ( ( -d $file ? rmdir : unlink ) || $_ ) } @files;
  3. or download this
    @dead = grep { ! defined( $keep{$_} ) &&
        ( ( -d $file ? rmdir : unlink ) || "$_:$!" ) } @files;