Select Code to Download

use warnings;
use strict;

my $data = <<FORCAST;

000
WTNT23 KNHC 180229
...
NEXT ADVISORY AT 16/2100Z

FORECASTER FRANKLIN

FORCAST

...
}

#...

1500Z TUE SEP 16 2003