3f58417405e0437ed8350738d1791b64177be2a9
5 use LWP
::Online
':skip_all';
6 use Test
::More tests
=> 6;
9 my $bp = WWW
::BackpackTF
->new;
10 my $user = $bp->get_users('76561198057056782');
11 is
$user->{name
}, 'gmariusx', '$user->{name} is correct';
12 ok
exists $user->{$_}, "\$user->{$_} exists" for qw
/steamid backpack_value backpack_update backpack_tf_reputation notifications/;
This page took 0.0246 seconds and 3 git commands to generate.