if ($res->is_success) {</br>
			my $fh = new FileHandle ">$filename";
			if (defined $fh) {
				print $fh $res->content;
				$fh->close;
			} else {
				print STDERR "could not open file $filename: $!\n";
			}
		{
		else }
			print STDERR $res->status_line, "\n";
		}
	}
}

$station = 'mn';
for ($year = 00; $year <= 04; $year++) {
	my $filename = '200' . $year . $station . 'zip';