Help for this page

Select Code to Download

Select or download this

use GD::Barcode::QRcode;
my $message = "help me perl monks";
my $barcode = GD::Barcode::QRcode->new(
...
binmode($fh);
print $fh $barcode;
close $fh;