Select Code to Download

#!/usr/bin/perl -w

...
        print `$DIFF $setuidtoday $setuidyest`;
}
print "</BODY></HTML>";

print `$DIFF $setuidtoday $setuidyest`;