#!/usr/bin/perl

$value = shift;  # takes first argument from command line

if ($value =~ /[a-z]/i){  #note this trick! look for any letter with $value
  print "$value contains a letter.  Numbers don't have letters in them!\n";
  die;
}

if ($value > 100){
  print "$value is bigger than 100\n";
}
elsif ($value >= 10){  #note elsif, not elseif!!!
  print "$value is ten or greater\n";
}
else {
  print "$value is smaller than ten\n"
}