Mega Code Archive

 

Categories / Perl / Language Basics

 

Using auto-increment operator for a string with digits

#!/usr/bin/perl -w $a = "A9"; print ++$a, "\n"; $a = "z9"; print ++$a, "\n"; $a = "9z"; print ++$a, "\n";