lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/PPI/Token/Number.pm in javonet-ruby-sdk-2.1.14 vs lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/PPI/Token/Number.pm in javonet-ruby-sdk-2.2.0
- old
+ new
@@ -30,11 +30,11 @@
=cut
use strict;
use PPI::Token ();
-our $VERSION = '1.277';
+our $VERSION = '1.278';
our @ISA = "PPI::Token";
=pod
@@ -91,9 +91,12 @@
if ( $char eq 'x' || $char eq 'X' ) {
$t->{class} = $t->{token}->set_class( 'Number::Hex' );
return 1;
} elsif ( $char eq 'b' || $char eq 'B' ) {
$t->{class} = $t->{token}->set_class( 'Number::Binary' );
+ return 1;
+ } elsif ( $char eq 'o' || $char eq 'O' ) {
+ $t->{class} = $t->{token}->set_class( 'Number::Octal' );
return 1;
} elsif ( $char =~ /\d/ ) {
# You cannot have 8s and 9s on octals
if ( $char eq '8' or $char eq '9' ) {
$token->{_error} = "Illegal character in octal number '$char'";