Divide according to multiple separators. : split « Regular Expression « Perl






Divide according to multiple separators.

      

#!usr/bin/perl

use warnings;
use strict;

my $string = "\nThis-is:a\@test-for,*you.";
my @words = split( /[-:@*]/, $string );
print "$_\n" foreach ( @words );

   
    
    
    
    
    
  








Related examples in the same category

1.@a = split (//, $s);
2.To get at each field, we can split when we see a colon:
3.The split function splits up a string EXPR by some delimiter (whitespace by default) and returns an array.
4.Using split and pattern matching
5.Using split, an anonymous list, and pattern matching
6.Defaults to split(' ', $_).
7.Divide it into a specific number of fields.
8.Split a string by using the regular expression