{ local $\ = '/'; chomp($string); $string .= '/'; } #### for ($string) { local $\ = '/'; chomp; $_ .= '/'; }