Select Code to Download

#!/usr/bin/perl

...
printf "%.2f\n", integrate sub {(shift)**2}, new Range (2, 5);

__END__