C:\strawberry\perl\bin\samples>perl
print(print (5+2)+10)
^Z
711