需要依次安装 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代码,效果如:
提示:
本文由神整理自网络,如有侵权请联系本站删除!
本站声明:
1、本站所有资源均来源于互联网,不保证100%完整、不提供任何技术支持;
2、本站所发布的文章以及附件仅限用于学习和研究目的;不得将用于商业或者非法用途;否则由此产生的法律后果,本站概不负责!