Help for this page

Select Code to Download


  1. or download this
    ci,14938340,2,"Monday, February 21, 2011 19:58:06 UTC",34.6953,-118.53
+50,2.2,17.40, 9,"Southern California"
  2. or download this
    @data1 = ($line =~ m/ *([a-z]+) *, *(\d+) *, *(\d+) *, *\"(.*?)\" *, *
+([\d\.]*) *, *([\d\.]*) *, *([\d\.]*) *, *([\d\.] *) *, *([\d\.]*) *,
+ *\"(.*?)\" */gi); 

...
$h = $8; 
$e = $5; 
$f = $6;
  3. or download this
    my ($a,$b,$c,$d,$e,$f,$g,$h,$i,$j) = @data1;