#! perl -slw
use strict;
use Benchmark qw[ cmpthese ];

our $N ||= 10;
our @data = (scalar <DATA>) x $N;
push @data, <DATA>;

cmpthese( -1, {
	'\S*\s*' => q[
		my @bits;
		@bits = m[(\S*\s*\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\".*\")\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)]
			for @data;
	],
	'\S+\s*' => q[
		my @bits;
		@bits = m[(\S+\s*\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\".*\")\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)]
			for @data;
	],
	'\S*\s' => q[
		my @bits;
		@bits = m[(\S*\s\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\".*\")\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)]
			for @data;
	],
	'\S+\s' => q[
		my @bits;
		@bits = m[(\S+\s\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\".*\")\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)]
			for @data;
	],
	'^\S*\s*$' => q[
		my @bits;
		@bits = m[(\S*\s*\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\".*\")\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)\s*(\S*)]
			for @data;
	],
	'^\S+\s*$' => q[
		my @bits;
		@bits = m[(\S+\s*\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\".*\")\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)\s*(\S+)]
			for @data;
	],
	'^\S*\s$' => q[
		my @bits;
		@bits = m[(\S*\s\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\".*\")\s(\S*)\s(\S*)\s(\S*)\s(\S*)\s(\S*)]
			for @data;
	],
	'^\S+\s$' => q[
		my @bits;
		@bits = m[(\S+\s\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\".*\")\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)]
			for @data;
	],
});

__DATA__
2004-03-01 22:00:12 2 15.32.17.34 200 TCP_HIT 3140 326 GET http www.wahm.com http://www.wahm.com/images/vote.gif u779479 DEFAULT_PARENT 61.2.249.106 - "Mozilla/4.0 (compatible; MSIE 5.01; Windows 95)" OBSERVED none - 61.2.249.47 SG-HTTP-Service
-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- "-- -- -- -- -- -- --