summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authordakkar <dakkar@luxion>2008-08-13 14:19:35 +0000
committerdakkar <dakkar@luxion>2008-08-13 14:19:35 +0000
commita94bd2e33d0fb4645eab7b9345f753a5edeeeee4 (patch)
treec7e00147f4e1fde1cf07e97da5ad551d1d7992ca
parentmoduli (circa) (diff)
downloadintro-perl-a94bd2e33d0fb4645eab7b9345f753a5edeeeee4.tar.gz
intro-perl-a94bd2e33d0fb4645eab7b9345f753a5edeeeee4.tar.bz2
intro-perl-a94bd2e33d0fb4645eab7b9345f753a5edeeeee4.zip
ora compila pure...
git-svn-id: svn://luxion/repos/intro-perl@358 fcb26f47-9200-0410-b104-b98ab5b095f3
-rw-r--r--corso.content.tex16
1 files changed, 8 insertions, 8 deletions
diff --git a/corso.content.tex b/corso.content.tex
index 6328ba9..e94dcb8 100644
--- a/corso.content.tex
+++ b/corso.content.tex
@@ -1316,7 +1316,7 @@ oppure \lstinline!ade!
\subsection{Uso generale} % m, s, split, =~, options, tr
-\begin{frame}[fragile]{Esempio: contare le pecore}
+\begin{frame}[fragile]\frametitle{Esempio: contare le pecore}
\begin{lstlisting}
use strict; use warnings;
my $pecore=0;
@@ -1329,7 +1329,7 @@ print "Ho visto $pecore pecore\n";
\end{lstlisting}
\end{frame}
-\begin{frame}[fragile]{L'operatore \texttt{m//}}
+\begin{frame}[fragile]\frametitle{L'operatore \texttt{m//}}
\lstinline!$linea =~ m{pecora}!
\begin{itemize}
@@ -1344,7 +1344,7 @@ delimitatori che volete
\end{itemize}
\end{frame}
-\begin{frame}[fragile]{Esempio: sommare i numeri}
+\begin{frame}[fragile]\frametitle{Esempio: sommare i numeri}
\begin{lstlisting}
use strict; use warnings;
my $totale=0;my $testo='';
@@ -1359,7 +1359,7 @@ print "Testo: $testo\n";
\end{frame}
%$
-\begin{frame}[fragile]{L'operatore \texttt{m//} in contesto lista}
+\begin{frame}[fragile]\frametitle{L'operatore \texttt{m//} in contesto lista}
\lstinline!my ($prima,$numero,$dopo) =!
\lstinline! $linea =~ m{^([^0-9]*)([0-9]+)(.*)$};!
%$
@@ -1373,7 +1373,7 @@ stringa che corrispondono ai pezzi tra parentesi
\end{itemize}
\end{frame}
-\begin{frame}[fragile]{Esempio: censurare gli indirizzi}
+\begin{frame}[fragile]\frametitle{Esempio: censurare gli indirizzi}
\begin{lstlisting}
use strict; use warnings;
while (my $linea=<>) {
@@ -1384,7 +1384,7 @@ while (my $linea=<>) {
\end{lstlisting}
\end{frame}
-\begin{frame}[fragile]{L'operatore \texttt{m//}}
+\begin{frame}[fragile]\frametitle{L'operatore \texttt{s///}}
\begin{lstlisting}[escapeinside=«»,backgroundcolor=,numbers=none]
$linea =~ s{[a-z0-9.-]+\@[a-z0-9.-]+}{***\@***};
@@ -1399,7 +1399,7 @@ stringa di sostituzione sono trattate come se avessero le virgolette doppie
\end{itemize}
\end{frame}
-\begin{frame}[fragile]{Esempio: leggere un CSV}
+\begin{frame}[fragile]\frametitle{Esempio: leggere un CSV}
\begin{lstlisting}
use strict; use warnings;
while (my $linea=<>) {
@@ -1413,7 +1413,7 @@ while (my $linea=<>) {
\end{lstlisting}
\end{frame}
-\begin{frame}[fragile]{L'operatore \texttt{m//}}
+\begin{frame}[fragile]\frametitle{\texttt{split}}
\begin{lstlisting}[escapeinside=«»,backgroundcolor=,numbers=none]
my @campi = split /,/,$linea;