while (<>) {
    if (/^(\w{3} \w{3} [ :\d]{16}) (\d+) ([.\d]+) (\d+) (.+) ([a]) ([_]) ([o]) ([r]) (\w+) (\w+) (\d) (\S) ([c])$/) {
        print "$1 $2 $3 $4 '$5' $6 $7 $8 $9 $10 $11 $12 $13 $14\n";
    }
}