Help for this page

Select Code to Download

Select or download this

  $_ = $response->content;
  m/GENERAL SYNOPSIS AT ([0-9]{4})<BR>\n(^.*<BR>\n)+<P>/mi;
  print "===> ".$1."  ".$2."\n";

Select or download this
```
===> 0100  1021 BY THAT TIME<BR>
```