programming-examples/perl/_Basics/Using auto-increment operator for a string with digits.pl
2019-11-15 12:59:38 +01:00

7 lines
114 B
Perl

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