Select Code to Download

#!/usr/bin/env perl

...
    print "\r\n\r\n";
    print "<div>$error</div>";
}