sanPerl:

Just finish your migration to linux from windows and your virus troubles will become much less troublesome.

Plus, the perl module for low level OS/hardware manipulation isn't available on windows anyhow.

s**lil*;  $*=join'',sort split q**;  s;.*;grr; &&s+(.(.)).+$2$1+; $; =
qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)
[download]