1# -*- perl -*- 2 3# t/001_load.t - check module loading and create testing directory 4 5use Test::More tests => 2; 6 7BEGIN { use_ok( 'WebService::Technorati' ); } 8my $apiKey = 'a_key_that_wont_work_with_a_live_query'; 9my $object = WebService::Technorati->new( key => $apiKey ); 10isa_ok ($object, 'WebService::Technorati'); 11 12 13