www.fromthevalley.com.au

regex remove multiple and replace once

#!/usr/bin/perl


my $v = "melbourne - vic this   is _ nice ";

$v =~ s/(\W|_)+/-/g;

print $v."\n";
HOME |  AJAX |  APACHE |  Bizphone |  CSS |  DNS |  General |  Graphics |  HTML |  Hardware |  Javascript |  Linux |  MAC |  MS SQL |  Mail |  Microsoft |  OFFICE 365 |  Perl |  Postgres |  SEO |  Social Media |  VMware |  Windows 10