Ajouts

Makefile

@@ -1,5 +1,12 @@
 
-default: charte.pdf fede.pdf regle.pdf
+default: charte.pdf fede.pdf regle.pdf collecte.pdf
+
+clean:
+	rm -f charte.log charte.aux
+	rm -f fede.log fede.aux
+	rm -f regle.log regle.aux
+	rm -f collecte.log collecte.aux
+	rm -f page*.pdf test.fdf missfont.log 
 
 %.pdf: %.tex
 	pdflatex $*

list-fields.pl

@@ -0,0 +1,28 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use PDF::FDF::Simple;
+use Data::Dumper;
+
+my $fdf = new PDF::FDF::Simple ();
+
+$fdf->filename('13969.fdf');
+$fdf->load();
+
+my $values = {
+	'form1[0].Page1[0].Adhesion[0]' => 'Fédération des ...',
+	'form1[0].Page1[0].Comp_Init[0]' => 1,
+#	'form1[0].Page1[0].Comp_Modif[0]' => 0,
+	'form1[0].Page1[0].Date_declaration[0]' => '25 juin 2011',
+	'form1[0].Page1[0].Lieu_declaration[0]' => 'Paris',
+	'form1[0].Page1[0].Nbre_Init[0]' => '7',
+#	'form1[0].Page1[0].Nbre_Modif[0]' => '7',
+	'form1[0].Page1[0].Nom_declarant[0]' => 'Benjamin BAYART, président',
+	'form1[0].Page1[0].Num_Waldec[0]' => ,
+	'form1[0].Page1[0].Titre_Long[0]' => 'Ceci est le titre en long !'
+};
+print Dumper(sort keys %{$fdf->content});
+
+