in reply to Re^2: modulo 1 (%1) and fractional part of a number
in thread modulo 1 (%1) and fractional part of a number

Gnarly expressions are gnarly. Luckily Larry gave us subroutines.

sub decpart { $_[0] - int $_[0]; }
my $part = decpart ( $foo->{bar}->baz( $bat, $ban, 5 * $bag) );

[download]

In Section Meditations