#!/usr/bin/perl

$alpha= "asc";
# string, pas interprétable comme une valeur numérique
$num = $alpha + 1;
print $num;
print "\n";
$alpha= "asc4";
# string, pas interprétable comme une valeur numérique
$num = $alpha + 1;
print $num;
print "\n";
$alpha= "4.1";
# string, MAIS interprétable comme une valeur numérique
$num = $alpha + 1;
print $num;
print "\n";