$ice="cold";
$length_ice = length ($ice); 
print $length_ice."\n";

#substr (var, start_position, length)
$age = substr($ice, 1, 2);
print $age."\n";

$mystring = "this is the long one";
print substr($mystring, length($mystring)-3, 3)