my ($dev, $inode) = do { no warnings; lstat _ };
    ($dev, $inode) = lstat $_ unless $dev;