while(<DATA>){
$ =~ m/publish|date/;
}
__DATA__
The book was published on the date "20-08-2009".