- or download this
#!/usr/bin/env perl
...
use Data::Dump;
dd $result;
- or download this
$ ./pm_11142528_parse_file.pl
Usage: ./pm_11142528_parse_file.pl input_file
- or download this
$ ./pm_11142528_parse_file.pl not_a_file
Can't open 'not_a_file' for reading: 'No such file or directory' at ./
+pm_11142528_parse_file.pl line 17
- or download this
$ cat pm_11142528_parse_file.txt
objet => debut
...
...
z => "aurai-je le dernier mot ?"
objet => fin
- or download this
$ ./pm_11142528_parse_file.pl pm_11142528_parse_file.txt
[
{ a => "premiere valeur", index => 1, z => "dernier mot" },
{ a => "autre valeur", index => 77, z => "aurai-je le dernier mot ?"
+ },
]