@items = ( $num =~ /\d/g ); #### @items = ( $num =~ /\d{1,$n}/g );