Select Code to Download

#!/usr/local/bin/perl

use strict;
...
print "Content-Type: text/html\n";
print '<meta http-equiv="refresh" content="2">', "\n\n";
}