... my $RGB = '#FF00FF'; @triplet = map hex, $RGB =~ /\w\w/g; ... #### ... my $RGB = '#FF00FF'; () = $RGB =~ /(\w\w)(?{push @triplet, hex $^N})/g; ...