This perl script recovers passwords out of unix swap files. UID or GID 0 required to read swap files. May be useful for finding passwords that were entered into the wrong machine. Tested on Red Hat 6.2 – 8.0.
You can download it from the following link: https://packetstormsecurity.com/files/download/30695/swap.pw.pl
Source: https://packetstormsecurity.com/files/30695/swap.pw.pl.html