#!/usr/bin/perl
while(<DATA>){
if($_ =~ m/publication date/){
print $_;
}

}

__DATA__
These are the dates.
The publication date is 20-10-09
The publicatiion dateee is 20-05-08
The publication dat is 10-06-07
The publication date's are 20-10-09,29-02-08