my $log = ... # contents of the SQL log file 
 
while ($log =~ m/\{(.*?)\}\s*\{(.*)\}/sg) { 
  print "execution time: $1\n"; 
  print "sql statement: $2\n"; 
}