for $text (<>) {
	while($text=~ s/\G(.*?)(\d+)\s*px//) {
		$num = int(1.25*$2);
		print $1,$num,"px";
	}
	#$text =~ m/(.*)/;
	print "$text";
}