Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use strict;
...

__DATA__
[{field1=>'value1',field2=>'value2',field3=>'value3'},{field1=>'value4
+',field2=>'value5',field3=>'value6'},{field1=>'value7',field2=>'value
+8',field3=>'value9'}]

Select or download this

VinsWorldcomC:\Users\VinsWorldcom\tmp> test.pl
$VAR1 = [
...
            'field3' => 'value9'
          }
        ];