Help for this page

Select Code to Download

Select or download this

my $string = <<'*END*';
<produtos>
...
    print "$data->{nome}, parselas: $data->{parcelamento}{parcelas}\n"
+;
#    ......................
}