Not Perl, but you could use t1binary from the good ol' t1utils package.
In reply to Re: Anyone know of pfa2pfb.pl? by almut in thread Anyone know of pfa2pfb.pl? by dbae