$str2 = $str;
  $str3 = sprintf ("str is %s", $str);
  @words = split(/ /, $str);