#!/usr/bin/perl -w
 
$a = "al";
#Incrémenter la chaîne et afficher le résultat
print ++$a, "n";