Select Code to Download

#!/usr/bin/perl

...
(3[678]|4[1678])
5[45]
(6[4569]|7[01])

(65|70) => 
debug <<you are here with []>>(65|70) end  
...
debug (6[4569]|7[01]<<you are here with [70 71]>>) end  
debug (6[4569]|7[01]<<you are here with [64 65 66 69 70 71]>>) end  
debug (6[4569]|7[01])<<you are here with [64 65 66 69 70 71]>> end  64
+,65,66,69,70,71