Using auto-increment operator for a string
#!/usr/bin/perl -w $a = "bz"; print ++$a, "\n"; $a = "Zz"; print ++$a, "\n";