print "$_ \n" foreach (17, $var, "a string");