Select Code to Download

#!/usr/bin/perl
use warnings;
...
   ++$cnt;
}
$pdf->saveas('svr.pdf');

$VAR1 = '24';
$VAR2 = '<Address>
...
<housenumber="140"/>
<streetname="xxx"/>
    </Address>';

number: 24, address information of the student.
Information:Address,
...
Information:Address,
                 housenumber="140",
                  streetname="xxx".