for ($modified_scalar) { s/^\s+//; s/\s+$//; }