$sample='prad';
print join('', map { ++$_} split(//, $sample) );
print"$sample";