Uso della stampa in Perl

“Esistono molte opzioni in Perl per stampare diversi tipi di valori e variabili. L'operatore di stampa è uno di questi. Stampa il valore che viene passato come argomento. Il doppio preventivo (““) viene utilizzato con l'operatore di stampa per stampare qualsiasi dati. Può essere utilizzato per stampare valori di stringa, una o più variabili, scrivere nel contenuto del file o leggere dal file. Gli usi di questo operatore di output in Perl sono stati mostrati in questo tutorial."

Sintassi

Di seguito sono riportate diverse sintassi dell'operatore di stampa.

1. Stampa String_Value
   L'operatore di stampa può essere utilizzato per stampare qualsiasi valore di stringa utilizzando quote singoli o doppie quote.
2. Stampa variabile_1, variabile_2,…, variabile_n
   L'operatore di stampa può essere utilizzato per stampare i valori di una o più variabili con o senza altri valori di stringa.
3. Stampa File_Handler String
   L'operatore di stampa può essere utilizzato per leggere dal file o scrivere nel file.

Valore di ritorno

Questa funzione restituisce 0 su errore e 1 al successo.

Diversi usi dell'operatore di stampa a Perl sono stati mostrati nella parte successiva di questo tutorial.

Esempio-1: stampare semplici messaggi

Crea un file Perl con il seguente codice che stamperà due semplici messaggi di testo con la nuova linea. Il primo operatore di stampa viene utilizzato per stampare il testo utilizzando le citazioni doppie. Il secondo operatore di stampa viene utilizzato per stampare il testo utilizzando singole citazioni.

# Stampa un messaggio utilizzando le citazioni doppie ("")
print ("Benvenuti a Linuxhint \ n");
# Stampa un messaggio utilizzando le citazioni singole (")
print ('impara la programmazione perl', "\ n");

Produzione:

Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.

Esempio-2: stampare più valori di stringa

Crea un file Perl con il seguente codice per stampare più valori di stringa utilizzando la virgola (,) con un operatore di stampa e utilizzando l'intervallo slash (\) con due operatori di stampa.

# Stampa più valori di stringa utilizzando il separatore
Stampa ("Benvenuti a LinuxHint."," "," Impara la programmazione Perl da Linuxhint.", "\N");
# Stampa più stringhe utilizzando due funzioni di stampa ()
Stampa ("Benvenuti a LinuxHint."); \
Stampa ("Impara la programmazione Perl da LinuxHint.", "\N");

Produzione:

Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.

Esempio-3: stampare una o più variabili

Una o più variabili possono essere stampate utilizzando l'operatore di stampa con le doppie citazioni (“). Crea un file Perl con il seguente codice che stamperà una singola variabile, due variabili e le variabili con altri valori di stringa. Una singola variabile è stata stampata utilizzando le citazioni doppie (“) con l'operatore di stampa. Sono state stampate due variabili di stringa senza utilizzare quotazioni con l'operatore di stampa. Una stringa e un valore numerico sono stati stampati con altri valori di stringa utilizzando l'operatore di stampa. Qui, Backslash (\) è stato con "$" per stampare "$" nell'output perché questo simbolo viene utilizzato per dichiarare la variabile in Perl.

# Definisci una variabile di stringa
$ string1 = 'hello';
# Stampa la variabile
stampare "$ string1 \ n";
# Definisci un'altra variabile di stringa
$ string2 = 'world';
# Stampa due variabili di stringa
Stampa $ String1, $ String2, "\ n";
# Definisci un altro valore di stringa
$ book_name = "programmazione perl";
# Definisci un valore numerico
$ price = 35;
# Stampa le variabili con altre stringhe usando la virgola (,)
Stampa "The Price of", $ book_name ", il libro è \ $", $ prezzo, ".\N";
# Stampa le variabili con altre stringhe usando Dot (.)
Stampa "il prezzo di".$ book_name."Il libro è \ $".$ prezzo.".\N";

Produzione:

Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.

Esempio-4: stampare il calcolo aritmetico

Il risultato di qualsiasi calcolo aritmetico può essere stampato direttamente utilizzando l'operatore di stampa. Crea un file Perl con il seguente codice che stamperà la moltiplicazione di due variabili numeriche e stampano il risultato di un'espressione aritmetica.

# Definisci due valori numerici
$ n1 = 45;
$ n2 = 5;
# Stampa il risultato di moltiplicazione delle variabili
Stampa "Il risultato della moltiplicazione è".$ n1*$ n2."\N";
# Stampa il risultato calcolato dell'espressione matematica
stampare "il risultato di espressione =", 2+6*7, "\ n";

Produzione:

Verrà visualizzato il seguente output dopo aver eseguito il codice sopra. La moltiplicazione di due variabili che hanno i valori 45 e 5 è 225. Il risultato dell'espressione aritmetica, 2+6*7, è 44.

Esempio-5: scrivi in ​​un file

Crea un file Perl con il seguente codice che aprirà un file per la scrittura e aggiungerà una riga di testo utilizzando l'operatore di stampa. Un file di testo chiamato temp.TXT è stato aperto per aver scritto usando un aprire funzione nel codice. Se il file esisteva prima, il contenuto del file verrà sovrascritto dal nuovo contenuto. Il file verrà chiuso utilizzando la funzione chiusura dopo aver completato l'operazione di scrittura.

# Apri il gestore di file per scrivere in un file
Apri FH, "> temp.TXT"
# Stampa Messaggio di errore
o morire "incapace di creare il file.";
# Scrivi il valore stringa nel file
Stampa FH "Aggiungi testo al file \ n";
# Chiudi il file
Chiudi FH
# Stampa Messaggio di errore
o morire "incapace di chiudere il file.\N";

Produzione:

Verrà visualizzato il seguente output dopo aver eseguito il codice sopra. Il comando "Cat" è stato eseguito per verificare se il file viene creato correttamente o meno.

Esempio-6: leggi da un file

Crea un file Perl con il seguente codice che aprirà un file per la lettura, iterazione del contenuto del file utilizzando un loop e stampare ogni riga del file utilizzando l'operatore di stampa. Un file di testo chiamato il mio file.TXT è stato aperto per la lettura usando il aprire funzione nel codice. Se il file non esiste, verrà stampato un messaggio di errore. Il file verrà chiuso utilizzando il vicino funzione dopo aver completato l'operazione di lettura.

# Apri il gestore di file per scrivere in un file
Apri FH "< myfile.txt"
# Stampa Messaggio di errore
o morire "incapace di aprire il file.";
# Leggere il file
Mentre()

# stampa la linea
stampare $ _;

# Chiudi il file
Chiudi FH
# Stampa Messaggio di errore
o morire "incapace di chiudere il file.\N";

Produzione:

Verrà visualizzato il seguente output dopo aver eseguito il codice sopra. Il comando "Cat" è stato eseguito per verificare il contenuto del file.

Conclusione

Il modo di usare il stampa Operatore in Perl per la stampa di valori o variabili di stringa singoli o più.