Re^2: remove spaces after join operation

This error Can't modify join or string in substitution (s///) at out.pl line 5, near "s/\s*(\.)\s*/$1/g;" is being shown

Comment on Re^2: remove spaces after join operation

Replies are listed 'Best First'.
Re^3: remove spaces after join operation by Loops (Curate) on Jul 26, 2013 at 11:37 UTC
Ah, is your version of Perl too old to support the /r modifier? It wont work without it. I Suppose: `my $txt = join ' ',@first_sentence; $txt =~ s/\s([.()])\s/$1/g; print $txt;` [download] Updated to simplify regex as suggested by hdb	[reply] [d/l]
Re^4: remove spaces after join operation by lakssreedhar (Acolyte) on Jul 27, 2013 at 04:38 UTC
ya its working now	[reply]