欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

Perl生成純HTML代碼二維碼實例

 更新時間:2014年06月20日 10:12:54   投稿:junjie  
這篇文章主要介紹了Perl生成純HTML代碼二維碼實例,需要的朋友可以參考下

需要依次安裝 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代碼,效果如:

相關(guān)文章

最新評論