You may assign to undef in a list.  This is useful for
       throwing away some of the return values of a function:

           ($dev, $ino, undef, undef, $uid, $gid) = stat($file);