Laissez-nous divisons cette URL en ses composants, qui est, "http:", "www.somewebsite.com", "rep1", "dir2" et "file.htm". Le séparateur ici est une barre oblique ou une double barre oblique. Le motif de cette séparation est: /\\ /{1,2} /Le modèle veut entre une ou deux barres obliques. Ce sera satisfaire les barres obliques simples ou doubles. Le code suivant illustre cela: use strict; my $ availableString = "https://www.somewebsite.com/dir1/dir2/file.
htm"; mesmots = split /\\ /{1,2} /, $ availableString; imprimer "premier élément est:", $ mots [0], "\\ n"; imprimer "deuxième élément est:", $ mots [1], "\\ n"; imprimer "troisième élément est:", $ mots [2], "\\ n"; imprimer "quatrième élément est:", $ mots [3], "\\ n"; imprimer "Cinquième élément est:", $ mots [4], "\\ n"; Donc, "http:" devient le premier élément du tableau, "www.somewebsite.com", devient le deuxième élément du tableau, "rep1" devient le troisième élément de réseau, "dir2" devient le quatrième élément du tableau et "file.htm" devient le cinquième élément de tableau.
Les séparateurs doivent vous utilisez toujours les //délimiteurs de cette expression rationnelle. N ° Perl vous donne la possibilité d'utiliser des séparateurs de votre choix. Les expressions suivantes produisent chacune un match: "Bonjour tout le monde" = ~ m Bonjour !; "Bonjour tout le monde" = ~ m {} Bonjour; "/dir1/dir/perl.exe" = ~ m "/perl\\.exe"; Les séparateurs //par défaut pour un match peuvent être changés pour des délimiteurs arbitraires en mettant un «m» à l'avant. Dans le premier exemple, les délimiteurs sont !!. Dans la deuxième expression sont les délimiteurs {}.
Dans le troisième exemple, les délimiteurs sont "". Le premier séparateur de quelque delimiter paire que vous choisissez, doit être précédée par m. Le code suivant illustre le premier cas: use strict; if ("Bonjour tout le monde" = ~ m Bonjour!) {print "assortie \\ n"; } Else {print "ne correspond pas \\ n"; } Wow, nous avon