Select Code to Download

#!/usr/bin/perl
use warnings;
use strict;
...
    }
    push @history, $dice;
}

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