Changeset 151

Timestamp:

07/27/08 00:18:15 (16 years ago)

Author:

nanardon

Message:

• perl introduction

File:

• trunk/perl/presentation.tex (modified) (1 diff)

trunk/perl/presentation.tex

@@ -40 +40 @@
 \end{frame}
 
+\section{Presentation}
+
+\begin{frame}
+\frametitle{PERL}
+Perl \textbf{5}, écrit par Larry Wall en 1987.
+\vfill
+\emph{Practical Extraction and Report Language}
+(\emph{langage pratique d'extraction et de génération de rapports})
+\vfill
+\emph{Pathetically Eclectic Rubbish Lister}
+(\emph{collectionneur de déchets pathétiquement éclectiques})
+\vfill
+
+Dernière version 5.10.0 (Rafael Garcia-Suarez)
+\vfill
+
+Perl est disponible sur UNIX, Windows (et cygwin), OS2, VMS, \ldots
+\end{frame}
+
+\begin{frame}
+\frametitle{Pourquoi PERL ?}
+\begin{itemize}
+\item permet une écriture rapide
+\pause
+\item possède un ramasse miettes (garbage collector)
+\pause
+\item est orienté objet
+\pause
+\item possède un grand nombre de modules additionnels
+\end{itemize}
+\pause
+\vfill
+\vfill
+Utilisation:
+\begin{itemize}
+\item petits scripts type shell
+\pause
+\item des programmes complexes
+\pause
+\item des services de toutes sortes
+\pause
+\item des sites web
+\end{itemize}
+\end{frame}
+
+\begin{frame}[fragile]
+\frametitle{Exemples}
+Exemple de script:
+\vfill
+\begin{verbatim}
+#!env perl
+
+print "Hello World\n";
+\end{verbatim}
+\vfill
+\vfill
+Sinon on peut aussi faire ça:
+\vfill
+\verb+perl -e 'print "Hello World\n"'+
+\end{frame}
+\begin{frame}[fragile]
+\frametitle{bestever.pl}
+Sinon ça peut aussi ressembler à ça:
+\vfill
+\begin{tiny}
+\begin{verbatim}
+/;{}def/#{def}def/$_={/Times-Bold exch selectfont}#/_{rmoveto}#/"{dup}#/*/!/$
+;/q{exch}#/x ; {/J q #}#/.{/T q #}#{stringwidth}#{}#{}# 14 string dup dup dup
+260 40 moveto 90 rotate ; %/}};$0='"\e[7m \e[0m"';@ARGV=split//,reverse
+q(ThePerl). q(Journal) x 220 ; q ; 0 T putinterval exch 7 J putinterval ;
+ ; $_= q /m$ pop T($*!$"=!$ " )pop " * true% ? $ " $!" "  !!  !! % !" !"    !
+! charpath {!"""}pop $ pop{""!}pop ! neg{!#}pop 220 ! neg _{!!}pop J false %T
+charpath  clip " pop 0 " moveto 6{!!}pop $_= 105{!!}pop {$ ! $ " !  #! ##}
+pop{dup dup $ ! " pop pop q{"}pop 22{dup show}repeat {"}pop q 22 mul{$ "} pop
+neg{!#! $ "}pop ! 8 .65 mul{$ # # $}pop ! neg{"}pop  _ pop{"}pop } repeat pop
+" {  $ " ! ! ! $ " ! !" "#"  #"!"""""! #" " # "m/;@ARGV=(@ARGV[-14..-1])x50;q}
+ 0 "%};s/m[ou]|[-\dA-ln-z.\n_{}]|\$_=//gx;s/(.)(?{$*=''})/('$*.='.(++$#
+%2?'':"$0;").'pop;')x(ord($1)-31).'$*'/gee;s/((.(\e\[.m)*|.){77})/$1\n/g;print
+; sub showpage {}
+\end{verbatim}
+\end{tiny}
+\vfill
+De Philippe Bruhat (Book).
+\end{frame}
+
 \section*{Fin}