@a=`factor`=~/ \d+/g;
if(@a==1){
	print"1@a";
}else{
	print eval(join"*",@a[1..$#a]),$a[0];
}