1*b8851fccSafresh1# 2*b8851fccSafresh1# $Id: isa.t,v 1.1 2015/04/02 12:08:24 dankogai Exp $ 3*b8851fccSafresh1# 4*b8851fccSafresh1use strict; 5*b8851fccSafresh1use Encode qw/find_encoding/; 6*b8851fccSafresh1use Test::More; 7*b8851fccSafresh1my @enc = Encode->encodings(":all"); 8*b8851fccSafresh1plan tests => 0+@enc; 9*b8851fccSafresh1isa_ok find_encoding($_), "Encode::Encoding" for @enc; 10*b8851fccSafresh1 11