D:\>perl -e"die grep /6/, 3 .. 6,6,6"
666 at -e line 1.


##</code><code>##

D:\>perl -e"die split 1, 121314"
234 at -e line 1.

D:\>perl -e"die split 1, 121314, 1"
121314 at -e line 1.

D:\>perl -e"die split 1, 121314, 2"
21314 at -e line 1.

D:\>perl -e"die split 1, 121314, 3"
2314 at -e line 1.

D:\>perl -e"die split 1, 121314, 4"

##</code><code>##

 my @matched_cve = map { split(',', $_) } @matched;