• Search for:

•  

  February 2004

  S	M	T	W	T	F	S
  « Jan				Mar »
  1	2	3	4	5	6	7
  8	9	10	11	12	13	14
  15	16	17	18	19	20	21
  22	23	24	25	26	27	28
  29

my @fields = split /,(?(?{$x&1})(?!))|”(?{++$x})(?!)/, $csv
The joys of state-machine regexes.