Как разделить строку с несколькими шаблонами в Perl?

Я хочу разбить строку на несколько шаблонов:

например.

my $string= "10:10:10, 12/1/2011";

my @string = split(/firstpattern/secondpattern/thirdpattern/, $string);

foreach(@string) {
    print "$_\n";
}

Я хочу получить следующий результат:

10
10
10
12
 1
2011

Как правильно это сделать?

13
задан TLP 24 November 2011 в 17:00
поделиться