Implement IGetMarketPrices and IGetUserListings

[www-backpacktf.git] / lib / WWW / BackpackTF / Item.pm

diff --git a/lib/WWW/BackpackTF/Item.pm b/lib/WWW/BackpackTF/Item.pm
index ee548ee798ac5cab4e84b9d30458a8206fdefdb2..ed13ed0df922aa527edbe6faf26e469f13302d7c 100644 (file)
--- a/lib/WWW/BackpackTF/Item.pm
+++ b/lib/WWW/BackpackTF/Item.pm
@@ -3,7 +3,7 @@ package WWW::BackpackTF::Item;
 use 5.014000;
 use strict;
 use warnings;
-our $VERSION = '0.000_002';
+our $VERSION = '0.002';
 
 sub new{
        my ($class, $name, $content) = @_;
@@ -35,6 +35,7 @@ WWW::BackpackTF::Item - Class representing item information
   use WWW::BackpackTF qw/VINTAGE GENUINE UNUSUAL/;
   use Data::Dumper qw/Dumper/;
 
+  my $bp = WWW::BackpackTF->new(key => '...');
   my @items = $bp->get_prices;
   my $item = $items[0];
   say 'Name: ', $item->name;
@@ -99,7 +100,7 @@ The difference bitween the former price and the current price. 0 if the current
 
 =head1 SEE ALSO
 
-L<http://backpack.tf/api/prices>
+L<http://backpack.tf/api/IGetPrices>
 
 =head1 AUTHOR
 
@@ -107,7 +108,7 @@ Marius Gavrilescu, E<lt>marius@ieval.roE<gt>
 
 =head1 COPYRIGHT AND LICENSE
 
-Copyright (C) 2014 by Marius Gavrilescu
+Copyright (C) 2014-2016 by Marius Gavrilescu
 
 This library is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself, either Perl version 5.18.2 or,