Select Code to Download

#!C:/Perl/bin/perl -w
use strict;
...
<input type="submit" name="action" value="Send"/>
</form><br/>
<span style="background-color:#ffff00">$msg</span>!;

# present result in a table
print '<table border="1" cellspacing="0" cellpadding="5">';
...
  } 
  return 0;  
}