diff options
author | dakkar <dakkar@luxion> | 2008-08-13 14:19:35 +0000 |
---|---|---|
committer | dakkar <dakkar@luxion> | 2008-08-13 14:19:35 +0000 |
commit | a94bd2e33d0fb4645eab7b9345f753a5edeeeee4 (patch) | |
tree | c7e00147f4e1fde1cf07e97da5ad551d1d7992ca | |
parent | moduli (circa) (diff) | |
download | intro-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.tex | 16 |
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; |