= ~ É chamado de operador de ligação. Ele se liga a cadeia disponível com o que está no seu direito, (/Mundo /). Agora /Mundo /é conhecido como o regex literal. O que está dentro das duas barras é chamado o padrão. Ele pode ser mais complexa do que o que (World) que você está vendo. O operador de ligação é dito ter dois argumentos: um ("Olá Mundo") à sua esquerda e outro (/Mundo /) à sua direita. Os dois argumentos eo operador de ligação formar uma expressão. Esta expressão pode ser usado em condicionais (se condição).
Se o padrão, neste caso, "mundo" é encontrada na seqüência disponível, então a expressão retorna true. Se ele não for encontrado, em seguida, a expressão retorna false. Correspondência é dito que ocorrem, se o padrão, (neste caso, "mundo") encontra-se na cadeia disponíveis. O seguinte código Perl, que você pode tentar, ilustra isso: use strict; if ("Olá Mundo" = ~ /World /) {print "Matched"; } Else {print "Not Matched"; } Se você tentar o código acima, o monitor iria imprimir, "Matched". Nota: uma variável pode ser usado no lugar da cadeia, "Olá Mundo" disponível.
Padrão Considere a seguinte seqüência de caracteres atribuído à variável, availableString. $ availableString = "Exemplos de criaturas são o bastão, o gato eo rato."; Você pode querer saber se a palavra "bastão", "gato" ou "rato" existem na string. Examinando a seqüência vemos que "morcego", "gato" e "ratos", cada extremidade em "at". O seguinte regex será usado para determinar se "morcego", "gato" ou "rato" existir na seqüência: /[BCR] at /Observe os colchetes ao redor "BCR"; b é a primeira letra na "bastão"; c é a primeira letra de "gato" e r é a primeira letra de "rat".
Estas primeiras letras estão dentro dos colchetes. Após os colchetes, você tem as duas próximas cartas que são comuns nos três palavras e siga as diferentes primeiras letras. O script a seguir irá produzir um jogo: use strict; meus $ availableString =