#!/usr/bin/perl use 5.014; # 972560 my $page = 1; my $start = ($page - 1) * 10; # please recite the rules on # evaluation order and the zero-times table my $end = $start + 10; say "\$start: $start; \$end: $end";