Using perl Syntax Highlighting
$user = $1 if ( $doc =~ m/::(.*?)__/mosix);
if (!$user) {
print "\033[1mUser mysql:\033[0m not found!\n";
}
else {
print "\033[1mUser mysql:\033[0m $user\n";
}
if (!$user) {
print "\033[1mUser mysql:\033[0m not found!\n";
}
else {
print "\033[1mUser mysql:\033[0m $user\n";
}
Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4
Mi código lo tengo puesto así pero éste no funciona siempre como debería de funcionar.
Yo lo que quiero hacer es que si esta línea se cumple:
Using perl Syntax Highlighting
imprima el $user, y si no (else), el 'not found'.
Pero no la cosa rara que tengo puesta: