Existem já bindings para o PunyURL em Perl e em PHP.
Em Perl, a distribuição WWW::Shorten::PunyURL permite criar links comprimidos de uma forma simples e rápida:
use WWW::Shorten::PunyURL; my $punyurl = WWW::Shorten::PunyURL->new( url => $long_url ); my $short_url = $punyurl->shorten;
É também possível, a partir de um url comprimido, aceder à sua versão original:
my $punyurl = WWW::Shorten::PunyURL->new( url => $short_url ); my $long_url = $punyurl->long;
my $long_url = $punyurl->long;
Em PHP, a classe PunyURL oferece-nos o comportamento homónimo:
<?php require_once("punyurl.class.php"); $shorten=PunyURL::short("http://sapo.pt"); $original=PunyURL::long("http://b.qz.sl.pt"); echo 'Puny URL: '.$shorten['puny']."<br>"; echo 'ASCii URL: '.$shorten['ascii']."<br>"; echo 'Preview URL: '.$shorten['preview']."<br><br>"; echo 'Original URL: '.$original['url']; ?>