$* is no longer supported #### for ($ro_string) { s/^\s*//; s/$*\s//; }