¿Como saber si una cadena esta en mayusculas?

[elmasca]

Hola a todos antes que nada, mi pregunta es ¿Como saber si una cadena esta en mayusculas?. ejem:


$cad="CIENCIA;

Espero que alguien me pueda ayudar.

Gracias

[monoswim]

pues yo lo haría con expresiones regulares...

$cad =~ /[^A-Z]/;

esa expresión dará verdadero si encuentra alguna letra que no pertenezca al alfabeto en mayúscula.

No lo probé así que cuéntame si funciona

Para aprender más sobre expresiones regulares, visita la sección de tutoriales de www.perlenespanol.com

Saludos

[monoswim]

ha, me olvidaba que puedes hacer una comprobación así

if ($cad =~ /[^A-Z]/;) {
print "tiene que ser todo en mayuscula";
} else {
print "bien, está todo en mayuscula";
}

Saludos

[elmasca]

Muchas gracias es justo lo que necesitaba

[pkj]

Perdon, era un mensaje de vb6.
Lo muevo.