Perl生成纯HTML代码二维码实例
摘要：需要依次安装qrencode、Text-QRCode、HTML-QRCode#!/usr/bin/perluseHTML::QRCode;m...
需要依次安装 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";
<html>
<head></head>
<body>
$qrcode
</body>
</html>
HTML
生成的二维码是纯HTML代码，效果如：
【Perl生成纯HTML代码二维码实例】相关文章：
★ Perl使用File::Basename获取文件扩展名的代码
上一篇：
perl几个文件操作例子
下一篇：
Perl脚本检测一个域名是否有效