use LWP::UserAgent;
  $ua = LWP::UserAgent->new;

  my $req = HTTP::Request->new(POST => 'http://bub2.met.psu.edu/cgi-win/WXDaily.EXE');
  $req->content_type('application/x-www-form-urlencoded');
  $req->content('dtg=18961110');

  my $res = $ua->request($req);
  print $res->as_string;