Shell -> Perl

That's what I usually do when my shell scripts get out of hand.