Nope

#!/usr/bin/perl -l

# http://perlmonks.org/?node_id=1176478

use strict;
use warnings;

my $string = '<1,22>:<5,7>:<333,0>';
my @x = split /\D+/, $string;
print /\d/ ? $_ : 'empty string' for @x;
[download]

prints

empty string
1
22
5
7
333
0
[download]

But without some sort of grep step, that produces a spurious leading empty string in the output list:

c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"my $string = '<1,22>:<5,7>:<333,0>';
 my @x = split /\D+/, $string;
 dd \@x;
"
["", 1, 22, 5, 7, 333, 0]
[download]