#1/usr/bin/perl 
use warnings; print 25, -4;