zsl@pc:~/codefolder $ perl dieroller.pl
Input the dice and modifier you want to roll like this: 2d9+100. To quit, press Ctrl-C.
2d9+100
101
101
^[[A
Argument "^[[A" isn't numeric in foreach loop entry at DDDR.pl line 19, <> line 2.
^C
zsl@pc:~/codefolder $