If you want to learn Perl, I would like to see your attempt at this extra behaviour. Then I and the group can help you with that. The general approach here is "post a question", "get some info", "learn and experiment", "post another question based upon what you've learned and your experimentation".
I've given you a start although I probably should have named rot_max_left() as shift_max_left(). I encourage you to give this a go yourself and post your code. | [reply] |