diff --git a/Changes b/Changes index 95f40ac..bb1e7bf 100644 --- a/Changes +++ b/Changes @@ -4,6 +4,7 @@ Revision history for Tesla-Vehicle - Bump prereq of Tesla::API to 1.02 for changes that isolate the API cache to object instances of that library - Add constants for geocoding API request attributes + - Bump prereq of Tesla::API to 1.03 0.08 2022-07-18 - Return 0 if charge_actual_current() is undef diff --git a/Makefile.PL b/Makefile.PL index be77f44..e6969c6 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -31,7 +31,7 @@ my %WriteMakefileArgs = ( }, PREREQ_PM => { 'JSON' => 0, - 'Tesla::API' => '1.02', + 'Tesla::API' => '1.03', }, dist => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', }, clean => { FILES => 'Tesla-Vehicle-*' }, diff --git a/examples/address.pl b/examples/address.pl index 1c03db1..23ea5f2 100755 --- a/examples/address.pl +++ b/examples/address.pl @@ -22,6 +22,15 @@ } my $gear = $car->gear; +my $charging = $car->charging_state; + +say "\n"; say "gear: $gear"; +say "charging: $charging"; + +say "\n"; + +say $car->latitude; +say $car->longitude; print "\n";