Perl生成纯HTML代码二维码实例（perl怎么用）学会了吗

需要依次安装 qrencode、Text-QRCode、HTML-QRCode

#!/usr/bin/perl

use HTML::QRCode;

my $text=’http://jb51.net/’;

my $qrcode=HTML::QRCode->new->plot($text);

print <<“HTML”;

  $qrcode

HTML

生成的二维码是纯HTML代码，效果如：