In addition to the above solutions, we can also use the as_int method:

my $n = Math::BigFloat->new(123);
say $n->as_int->digit(-1);      # prints: 1
[download]