lower and upper case

[ralph]

Hallo

Kann mir jemand bei meinem Problem helfen?

Wie kann ich mit Perl überprüfen ob ein String, der nur aus einem Zeichen besteht, lower oder uppercase ist?

z.B.

if ($var == "GROSS geschrieben"){    #gross geschrieben
    &machirgendwas;
    }
else {                               #klein geschrieben
    &machwasanderes;
    }

Danke und Gruss
Ralph

P.S.

RTFM hat leider nichts gebracht ;-)