print "foreach takes :"."$_\n";