Decrementing Characters

[Jeff Westman]

Hi,

Simple question here.  I need to decrement a character "counter".
Incementing works fine, but not decrementing.

I have:

 #!/bin/perl
use warnings;
$var = 'm';

print "var was $var\n";
$var++;
print "var was $var\n";
--$var;
print "var is $var\n";


And I get:

0: rc-hp18:/home/dnxjjw5/dev
$ x2.pl
var was m
var was n
var is -1

I expected to see "var is m" in the last line.

I know this is trivial, but I can't seem to see it.



Thanks in advance!!


Jeff