A simple antivirus written in Perl.