Help for this page

Select Code to Download


  1. or download this
    my @s = ( 
    '129-129A & B-131 NORTH AV', 
...
129-129A|+|B-131|NORTH|AV
129-129A|/|B-131|NORTH|AV
129-129A|-|B-131|NORTH|AV
  2. or download this
    perl> print join'|', grep $_, split '([&/+-])|\s+', $_ for @s;
129|-|129A|&|B|-|131|NORTH|AV
129|-|129A|+|B|-|131|NORTH|AV
129|-|129A|/|B|-|131|NORTH|AV
129|-|129A|-|B|-|131|NORTH|AV