Come rimuovere l'ultimo ottetto in Perl

Secondo l'indice lingua TIOBE , Perl è uno dei linguaggi di programmazione più popolari al mondo . Nel gergo di rete , un " ottetto " si riferisce a un insieme di cifre separati da punti in un indirizzo IP. Perl include strumenti per manipolare le stringhe . L' ultimo ottetto può essere rimosso da un indirizzo IP in poche righe di Perl . Inoltre , Perl supporta lo sviluppo interattivo , i programmatori possono scrivere ed eseguire programmi contemporaneamente . Istruzioni
1

Aprire un interprete Perl . La sua posizione dipende dal percorso specificato durante l'installazione di Perl
2

Inserisci il seguente codice : .

$ IP = " 192.168.2.1 "

Questo crea l' . variabile " IP ", che contiene il valore della nostra stringa
3

Inserisci il seguente codice :

@ an_array = split ( //, $ IP . )

Questo codice divide l'indirizzo IP sui periodi . Per rimuovere l'ultimo elemento , utilizzare una fetta di array in questo modo .

@ An_array [ 0 , -1 ]