#!perl -pl
/ \d+/;$_=($L=($'*$`/$&)**.5).$".$`/$L.$".$'/$L