#!/usr/bin/perl -l

# http://perlmonks.org/?node_id=1178018

use strict;
use warnings;

while(<DATA>)
  {
  print /\.{3}(.*?)\.{3}/;
  }
  
__DATA__
...FLASH FREEZE AND AREAS OF BLACK ICE... Temperatures will continue to fall in the wake of a strong cold front as brisk and gusty west to northwest winds usher in much colder air. As temperatures drop into the 20s lingering standing water on roads and other untreated surfaces will freeze up creating hazardous driving and walking conditions. In addition,