#!/usr/bin/perluse 5.10.0;map{$s+=$_,$r+=$_**2}(<>..<>);say$s**2-$r
91 123
12087152
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!