Guida avanzata di scripting Bash - Portale Posta DMI

Capitolo 33. Miscellanea
modulare e supporta qualsiasi cosa, dalla programmazione orientata agli oggetti fino alla preparazione
del caffè. Brevi script in Perl si prestano bene ad essere inseriti in script di shell e si può anche
dichiarare, con qualche ragione, che Perl possa sostituire completamente lo scripting di shell stesso
(sebbene l’autore di questo documento rimanga scettico).
Esempio 33-6. Perl inserito in uno script Bash
#!/bin/bash
# I comandi shell possono precedere lo script Perl.
echo "Questa riga precede lo script Perl inserito in \"$0\"."
echo "==============================================================="
perl -e ’print "Questo è lo script Perl che è stato inserito.\n";’
# Come sed, anche Perl usa l’opzione "-e".
echo "==============================================================="
echo "Comunque, lo script può contenere anche comandi di shell e di sistema."
exit 0
È anche possibile combinare, in un unico file, uno script Bash e uno script Perl. Dipenderà dal modo in
cui lo script verrà invocato quale delle due parti sarà eseguita.
Esempio 33-7. Script Bash e Perl combinati
#!/bin/bash
# bashandperl.sh
echo "Saluti dalla parte Bash dello script."
# Qui possono seguire altri comandi Bash.
exit 0
# Fine della parte Bash dello script.
# =======================================================
#!/usr/bin/perl
# Questa parte dello script deve essere invocata con l’opzione -x.
print "Saluti dalla parte Perl dello script.\n";
# Qui possono seguire altri comandi Perl.
# Fine della parte Perl dello script.
bash$ bash bashandperl.sh
Saluti dalla parte Bash dello script.
bash$ perl -x bashandperl.sh
551