Select Code to Download

print <<"END_FORMAT";
date time       = $1
...
.
.
END_FORMAT

my ($user_agent) = /\"(.*)\"/;
s/\".*\"//;
...
.
.
END_FORMAT

my @F = /(\" .*? \" | \S+)/gx;