From 6f3dd64f7251165b27eab096f0b9ed2f829f78ed Mon Sep 17 00:00:00 2001 From: karchnu Date: Wed, 27 Jun 2012 21:33:44 +0200 Subject: [PATCH] =?UTF-8?q?de=20grosses=20M=C3=80J=20et=20ajout=20du=20pro?= =?UTF-8?q?jet=20'antipixel'?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- PERL_Language/wc.pl | 17 ----- bash/add-torrents | 9 +++ {C_Language => c}/apres.c | 0 {C_Language => c}/cd.c | 0 {C_Language => c}/chrono.c | 0 {C_Language => c}/cronbis.c | 0 {C_Language => c}/eko.c | 0 {C_Language => c}/eko2.c | 0 {C_Language => c}/exoPointeurs.c | 0 {C_Language => c}/function.c | 0 {C_Language => c}/lirecharl.c | 0 {C_Language => c}/matrice1.c | 0 {C_Language => c}/matrice2.c | 0 {C_Language => c}/mini_shell.c | 0 {C_Language => c}/minmax.c | 0 {C_Language => c}/minuscule.c | 0 {C_Language => c}/miroir.c | 0 {C_Language => c}/monswap.c | 0 {C_Language => c}/multiChrono.c | 0 {C_Language => c}/palindrome.c | 0 {C_Language => c}/printenv.c | 0 .../Exemple_curses/essaiCurses | Bin .../Exemple_curses/essaiCurses.doc | Bin .../Exemple_curses/essaiCurses.pdf | Bin .../Exemple_curses/essaicurses.c | 0 .../Exemples_semaphores/a.out | Bin .../Exemples_semaphores/creaZ | Bin .../Exemples_semaphores/creaZ.c | 0 .../Exemples_semaphores/ecrireZ.c | 0 .../Exemples_semaphores/ecrireZ_Sem | Bin .../Exemples_semaphores/ecrireZ_Sem.c | 0 .../Exemples_semaphores/lireZ | Bin .../Exemples_semaphores/lireZ.c | 0 .../Exemples_semaphores/raZ | Bin .../Exemples_semaphores/raZ.c | 0 .../Exemples_semaphores/sema.c | 0 .../Exemples_semaphores/sema.h | 0 .../Exemples_semaphores/sema.o | Bin .../FileeDeMessage/msgCons.c | 0 .../FileeDeMessage/msgProd.c | 0 .../FileeDeMessage/nom2_de_fichier_existant | 0 .../FileeDeMessage/test_msgctl.c | 0 .../essaiCurses.pdf | Bin .../exercice_rw/Makefile | 0 .../exercice_rw/consommateur.c | 0 .../exercice_rw/consommateur.h | 0 .../exercice_rw/constantes.h | 0 .../exercice_rw/global.c | 0 .../exercice_rw/producteur.c | 0 .../exercice_rw/producteur.h | 0 .../exercice_rw/rapport | 0 .../exercice_rw/sema.c | 0 .../exercice_rw/sema.h | 0 .../exercice_rw/types.h | 0 .../ipc_shm_posix.c | 0 .../manuel_2009.pdf | Bin .../semaphores_manuel_exemples/wtest6.c.pdf | Bin {C_Language => c}/skel_getopts.c | 0 {C_Language => c}/squeeze.c | 0 {C_Language => c}/strdup.c | 0 {C_Language => c}/strdup2.c | 0 {C_Language => c}/swapp.c | 0 {C_Language => c}/testargs.c | 0 {C_Language => c}/voir.c | 0 {C_Language => c}/weechat_plugins/Makefile | 0 .../weechat_plugins/currentsong.c | 0 c/weechat_plugins/libcurrentsong.so | Bin 0 -> 10009 bytes c/weechat_plugins/test.c | 66 ++++++++++++++++++ .../weechat_plugins/weechat-plugins.h | 0 {C_Language => c}/wordcount.c | 0 perl/LeLangagePerl.txt | 26 +++++++ perl/antipixel/.MyWrapper.pm.swp | Bin 0 -> 12288 bytes perl/antipixel/.lanceur.pl.swp | Bin 0 -> 12288 bytes perl/antipixel/MyWrapper.pm | 52 ++++++++++++++ perl/antipixel/gd_image.pl | 36 ++++++++++ perl/antipixel/lanceur.pl | 8 +++ {PERL_Language => perl}/chrono.pl | 0 {PERL_Language => perl}/daemon.pl | 0 {PERL_Language => perl}/enMajuscule.pl | 0 {PERL_Language => perl}/eratosthene.pl | 0 perl/essai.perl | 18 +++++ perl/essai2.perl | 16 +++++ perl/essai3.perl | 24 +++++++ {PERL_Language => perl}/getpwent.pl | 0 {PERL_Language => perl}/getpwent2.pl | 0 perl/grep.pl | 21 ++++++ perl/grep2.pl | 14 ++++ {PERL_Language => perl}/humanornot.pl | 0 {PERL_Language => perl}/humanornot2.pl | 0 perl/image.png | Bin 0 -> 173 bytes {PERL_Language => perl}/lePlusGros.pl | 0 {PERL_Language => perl}/max.pl | 0 {PERL_Language => perl}/maxcourt.pl | 0 {PERL_Language => perl}/mirroir.pl | 0 {PERL_Language => perl}/multi_chrono.pl | 0 {PERL_Language => perl}/nbmots.pl | 0 {PERL_Language => perl}/rappels.pl | 0 {PERL_Language => perl}/silent_cmp.pl | 0 {PERL_Language => perl}/tube.pl | 0 perl/wc.pl | 15 ++++ 100 files changed, 305 insertions(+), 17 deletions(-) delete mode 100755 PERL_Language/wc.pl create mode 100755 bash/add-torrents rename {C_Language => c}/apres.c (100%) rename {C_Language => c}/cd.c (100%) rename {C_Language => c}/chrono.c (100%) rename {C_Language => c}/cronbis.c (100%) rename {C_Language => c}/eko.c (100%) rename {C_Language => c}/eko2.c (100%) rename {C_Language => c}/exoPointeurs.c (100%) rename {C_Language => c}/function.c (100%) rename {C_Language => c}/lirecharl.c (100%) rename {C_Language => c}/matrice1.c (100%) rename {C_Language => c}/matrice2.c (100%) rename {C_Language => c}/mini_shell.c (100%) rename {C_Language => c}/minmax.c (100%) rename {C_Language => c}/minuscule.c (100%) rename {C_Language => c}/miroir.c (100%) rename {C_Language => c}/monswap.c (100%) rename {C_Language => c}/multiChrono.c (100%) rename {C_Language => c}/palindrome.c (100%) rename {C_Language => c}/printenv.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemple_curses/essaiCurses (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemple_curses/essaiCurses.doc (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemple_curses/essaiCurses.pdf (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemple_curses/essaicurses.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/a.out (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/creaZ (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/creaZ.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ_Sem (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ_Sem.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/lireZ (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/lireZ.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/raZ (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/raZ.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/sema.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/sema.h (100%) rename {C_Language => c}/semaphores_manuel_exemples/Exemples_semaphores/sema.o (100%) rename {C_Language => c}/semaphores_manuel_exemples/FileeDeMessage/msgCons.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/FileeDeMessage/msgProd.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/FileeDeMessage/nom2_de_fichier_existant (100%) rename {C_Language => c}/semaphores_manuel_exemples/FileeDeMessage/test_msgctl.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/essaiCurses.pdf (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/Makefile (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/consommateur.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/consommateur.h (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/constantes.h (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/global.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/producteur.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/producteur.h (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/rapport (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/sema.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/sema.h (100%) rename {C_Language => c}/semaphores_manuel_exemples/exercice_rw/types.h (100%) rename {C_Language => c}/semaphores_manuel_exemples/ipc_shm_posix.c (100%) rename {C_Language => c}/semaphores_manuel_exemples/manuel_2009.pdf (100%) rename {C_Language => c}/semaphores_manuel_exemples/wtest6.c.pdf (100%) rename {C_Language => c}/skel_getopts.c (100%) rename {C_Language => c}/squeeze.c (100%) rename {C_Language => c}/strdup.c (100%) rename {C_Language => c}/strdup2.c (100%) rename {C_Language => c}/swapp.c (100%) rename {C_Language => c}/testargs.c (100%) rename {C_Language => c}/voir.c (100%) rename {C_Language => c}/weechat_plugins/Makefile (100%) rename {C_Language => c}/weechat_plugins/currentsong.c (100%) create mode 100755 c/weechat_plugins/libcurrentsong.so create mode 100644 c/weechat_plugins/test.c rename {C_Language => c}/weechat_plugins/weechat-plugins.h (100%) rename {C_Language => c}/wordcount.c (100%) create mode 100644 perl/LeLangagePerl.txt create mode 100644 perl/antipixel/.MyWrapper.pm.swp create mode 100644 perl/antipixel/.lanceur.pl.swp create mode 100644 perl/antipixel/MyWrapper.pm create mode 100644 perl/antipixel/gd_image.pl create mode 100644 perl/antipixel/lanceur.pl rename {PERL_Language => perl}/chrono.pl (100%) rename {PERL_Language => perl}/daemon.pl (100%) rename {PERL_Language => perl}/enMajuscule.pl (100%) rename {PERL_Language => perl}/eratosthene.pl (100%) create mode 100755 perl/essai.perl create mode 100755 perl/essai2.perl create mode 100755 perl/essai3.perl rename {PERL_Language => perl}/getpwent.pl (100%) rename {PERL_Language => perl}/getpwent2.pl (100%) create mode 100755 perl/grep.pl create mode 100755 perl/grep2.pl rename {PERL_Language => perl}/humanornot.pl (100%) rename {PERL_Language => perl}/humanornot2.pl (100%) create mode 100644 perl/image.png rename {PERL_Language => perl}/lePlusGros.pl (100%) rename {PERL_Language => perl}/max.pl (100%) rename {PERL_Language => perl}/maxcourt.pl (100%) rename {PERL_Language => perl}/mirroir.pl (100%) rename {PERL_Language => perl}/multi_chrono.pl (100%) rename {PERL_Language => perl}/nbmots.pl (100%) rename {PERL_Language => perl}/rappels.pl (100%) rename {PERL_Language => perl}/silent_cmp.pl (100%) rename {PERL_Language => perl}/tube.pl (100%) create mode 100755 perl/wc.pl diff --git a/PERL_Language/wc.pl b/PERL_Language/wc.pl deleted file mode 100755 index 50a28bd..0000000 --- a/PERL_Language/wc.pl +++ /dev/null @@ -1,17 +0,0 @@ -#!/usr/bin/perl -w - -# This script displays the number of lines in a file - -use strict; - -die "un argument svp ! " if !defined ($ARGV[0]); - -my $i=0; -open(P,"< $ARGV[0]") || die "erreur ouverture $!"; - -while (

) -{ - $i++; -} -close(P); -print "nb de lignes = $i \n"; diff --git a/bash/add-torrents b/bash/add-torrents new file mode 100755 index 0000000..6280027 --- /dev/null +++ b/bash/add-torrents @@ -0,0 +1,9 @@ +#!/bin/bash + +dir=~/Téléchargements/ +torrentsdir=~/torrents/ +server=server + +find $dir -name "*.torrent" -exec transmission-remote-cli -a "{}" && mv "{}" $torrentsdir \; +rsync -av $torrentsdir $server:$torrentsdir +#ssh $server $(< add-torrents-remote) diff --git a/C_Language/apres.c b/c/apres.c similarity index 100% rename from C_Language/apres.c rename to c/apres.c diff --git a/C_Language/cd.c b/c/cd.c similarity index 100% rename from C_Language/cd.c rename to c/cd.c diff --git a/C_Language/chrono.c b/c/chrono.c similarity index 100% rename from C_Language/chrono.c rename to c/chrono.c diff --git a/C_Language/cronbis.c b/c/cronbis.c similarity index 100% rename from C_Language/cronbis.c rename to c/cronbis.c diff --git a/C_Language/eko.c b/c/eko.c similarity index 100% rename from C_Language/eko.c rename to c/eko.c diff --git a/C_Language/eko2.c b/c/eko2.c similarity index 100% rename from C_Language/eko2.c rename to c/eko2.c diff --git a/C_Language/exoPointeurs.c b/c/exoPointeurs.c similarity index 100% rename from C_Language/exoPointeurs.c rename to c/exoPointeurs.c diff --git a/C_Language/function.c b/c/function.c similarity index 100% rename from C_Language/function.c rename to c/function.c diff --git a/C_Language/lirecharl.c b/c/lirecharl.c similarity index 100% rename from C_Language/lirecharl.c rename to c/lirecharl.c diff --git a/C_Language/matrice1.c b/c/matrice1.c similarity index 100% rename from C_Language/matrice1.c rename to c/matrice1.c diff --git a/C_Language/matrice2.c b/c/matrice2.c similarity index 100% rename from C_Language/matrice2.c rename to c/matrice2.c diff --git a/C_Language/mini_shell.c b/c/mini_shell.c similarity index 100% rename from C_Language/mini_shell.c rename to c/mini_shell.c diff --git a/C_Language/minmax.c b/c/minmax.c similarity index 100% rename from C_Language/minmax.c rename to c/minmax.c diff --git a/C_Language/minuscule.c b/c/minuscule.c similarity index 100% rename from C_Language/minuscule.c rename to c/minuscule.c diff --git a/C_Language/miroir.c b/c/miroir.c similarity index 100% rename from C_Language/miroir.c rename to c/miroir.c diff --git a/C_Language/monswap.c b/c/monswap.c similarity index 100% rename from C_Language/monswap.c rename to c/monswap.c diff --git a/C_Language/multiChrono.c b/c/multiChrono.c similarity index 100% rename from C_Language/multiChrono.c rename to c/multiChrono.c diff --git a/C_Language/palindrome.c b/c/palindrome.c similarity index 100% rename from C_Language/palindrome.c rename to c/palindrome.c diff --git a/C_Language/printenv.c b/c/printenv.c similarity index 100% rename from C_Language/printenv.c rename to c/printenv.c diff --git a/C_Language/semaphores_manuel_exemples/Exemple_curses/essaiCurses b/c/semaphores_manuel_exemples/Exemple_curses/essaiCurses similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemple_curses/essaiCurses rename to c/semaphores_manuel_exemples/Exemple_curses/essaiCurses diff --git a/C_Language/semaphores_manuel_exemples/Exemple_curses/essaiCurses.doc b/c/semaphores_manuel_exemples/Exemple_curses/essaiCurses.doc similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemple_curses/essaiCurses.doc rename to c/semaphores_manuel_exemples/Exemple_curses/essaiCurses.doc diff --git a/C_Language/semaphores_manuel_exemples/Exemple_curses/essaiCurses.pdf b/c/semaphores_manuel_exemples/Exemple_curses/essaiCurses.pdf similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemple_curses/essaiCurses.pdf rename to c/semaphores_manuel_exemples/Exemple_curses/essaiCurses.pdf diff --git a/C_Language/semaphores_manuel_exemples/Exemple_curses/essaicurses.c b/c/semaphores_manuel_exemples/Exemple_curses/essaicurses.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemple_curses/essaicurses.c rename to c/semaphores_manuel_exemples/Exemple_curses/essaicurses.c diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/a.out b/c/semaphores_manuel_exemples/Exemples_semaphores/a.out similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/a.out rename to c/semaphores_manuel_exemples/Exemples_semaphores/a.out diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/creaZ b/c/semaphores_manuel_exemples/Exemples_semaphores/creaZ similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/creaZ rename to c/semaphores_manuel_exemples/Exemples_semaphores/creaZ diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/creaZ.c b/c/semaphores_manuel_exemples/Exemples_semaphores/creaZ.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/creaZ.c rename to c/semaphores_manuel_exemples/Exemples_semaphores/creaZ.c diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ.c b/c/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ.c rename to c/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ.c diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ_Sem b/c/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ_Sem similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ_Sem rename to c/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ_Sem diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ_Sem.c b/c/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ_Sem.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ_Sem.c rename to c/semaphores_manuel_exemples/Exemples_semaphores/ecrireZ_Sem.c diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/lireZ b/c/semaphores_manuel_exemples/Exemples_semaphores/lireZ similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/lireZ rename to c/semaphores_manuel_exemples/Exemples_semaphores/lireZ diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/lireZ.c b/c/semaphores_manuel_exemples/Exemples_semaphores/lireZ.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/lireZ.c rename to c/semaphores_manuel_exemples/Exemples_semaphores/lireZ.c diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/raZ b/c/semaphores_manuel_exemples/Exemples_semaphores/raZ similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/raZ rename to c/semaphores_manuel_exemples/Exemples_semaphores/raZ diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/raZ.c b/c/semaphores_manuel_exemples/Exemples_semaphores/raZ.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/raZ.c rename to c/semaphores_manuel_exemples/Exemples_semaphores/raZ.c diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/sema.c b/c/semaphores_manuel_exemples/Exemples_semaphores/sema.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/sema.c rename to c/semaphores_manuel_exemples/Exemples_semaphores/sema.c diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/sema.h b/c/semaphores_manuel_exemples/Exemples_semaphores/sema.h similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/sema.h rename to c/semaphores_manuel_exemples/Exemples_semaphores/sema.h diff --git a/C_Language/semaphores_manuel_exemples/Exemples_semaphores/sema.o b/c/semaphores_manuel_exemples/Exemples_semaphores/sema.o similarity index 100% rename from C_Language/semaphores_manuel_exemples/Exemples_semaphores/sema.o rename to c/semaphores_manuel_exemples/Exemples_semaphores/sema.o diff --git a/C_Language/semaphores_manuel_exemples/FileeDeMessage/msgCons.c b/c/semaphores_manuel_exemples/FileeDeMessage/msgCons.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/FileeDeMessage/msgCons.c rename to c/semaphores_manuel_exemples/FileeDeMessage/msgCons.c diff --git a/C_Language/semaphores_manuel_exemples/FileeDeMessage/msgProd.c b/c/semaphores_manuel_exemples/FileeDeMessage/msgProd.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/FileeDeMessage/msgProd.c rename to c/semaphores_manuel_exemples/FileeDeMessage/msgProd.c diff --git a/C_Language/semaphores_manuel_exemples/FileeDeMessage/nom2_de_fichier_existant b/c/semaphores_manuel_exemples/FileeDeMessage/nom2_de_fichier_existant similarity index 100% rename from C_Language/semaphores_manuel_exemples/FileeDeMessage/nom2_de_fichier_existant rename to c/semaphores_manuel_exemples/FileeDeMessage/nom2_de_fichier_existant diff --git a/C_Language/semaphores_manuel_exemples/FileeDeMessage/test_msgctl.c b/c/semaphores_manuel_exemples/FileeDeMessage/test_msgctl.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/FileeDeMessage/test_msgctl.c rename to c/semaphores_manuel_exemples/FileeDeMessage/test_msgctl.c diff --git a/C_Language/semaphores_manuel_exemples/essaiCurses.pdf b/c/semaphores_manuel_exemples/essaiCurses.pdf similarity index 100% rename from C_Language/semaphores_manuel_exemples/essaiCurses.pdf rename to c/semaphores_manuel_exemples/essaiCurses.pdf diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/Makefile b/c/semaphores_manuel_exemples/exercice_rw/Makefile similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/Makefile rename to c/semaphores_manuel_exemples/exercice_rw/Makefile diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/consommateur.c b/c/semaphores_manuel_exemples/exercice_rw/consommateur.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/consommateur.c rename to c/semaphores_manuel_exemples/exercice_rw/consommateur.c diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/consommateur.h b/c/semaphores_manuel_exemples/exercice_rw/consommateur.h similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/consommateur.h rename to c/semaphores_manuel_exemples/exercice_rw/consommateur.h diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/constantes.h b/c/semaphores_manuel_exemples/exercice_rw/constantes.h similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/constantes.h rename to c/semaphores_manuel_exemples/exercice_rw/constantes.h diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/global.c b/c/semaphores_manuel_exemples/exercice_rw/global.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/global.c rename to c/semaphores_manuel_exemples/exercice_rw/global.c diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/producteur.c b/c/semaphores_manuel_exemples/exercice_rw/producteur.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/producteur.c rename to c/semaphores_manuel_exemples/exercice_rw/producteur.c diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/producteur.h b/c/semaphores_manuel_exemples/exercice_rw/producteur.h similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/producteur.h rename to c/semaphores_manuel_exemples/exercice_rw/producteur.h diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/rapport b/c/semaphores_manuel_exemples/exercice_rw/rapport similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/rapport rename to c/semaphores_manuel_exemples/exercice_rw/rapport diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/sema.c b/c/semaphores_manuel_exemples/exercice_rw/sema.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/sema.c rename to c/semaphores_manuel_exemples/exercice_rw/sema.c diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/sema.h b/c/semaphores_manuel_exemples/exercice_rw/sema.h similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/sema.h rename to c/semaphores_manuel_exemples/exercice_rw/sema.h diff --git a/C_Language/semaphores_manuel_exemples/exercice_rw/types.h b/c/semaphores_manuel_exemples/exercice_rw/types.h similarity index 100% rename from C_Language/semaphores_manuel_exemples/exercice_rw/types.h rename to c/semaphores_manuel_exemples/exercice_rw/types.h diff --git a/C_Language/semaphores_manuel_exemples/ipc_shm_posix.c b/c/semaphores_manuel_exemples/ipc_shm_posix.c similarity index 100% rename from C_Language/semaphores_manuel_exemples/ipc_shm_posix.c rename to c/semaphores_manuel_exemples/ipc_shm_posix.c diff --git a/C_Language/semaphores_manuel_exemples/manuel_2009.pdf b/c/semaphores_manuel_exemples/manuel_2009.pdf similarity index 100% rename from C_Language/semaphores_manuel_exemples/manuel_2009.pdf rename to c/semaphores_manuel_exemples/manuel_2009.pdf diff --git a/C_Language/semaphores_manuel_exemples/wtest6.c.pdf b/c/semaphores_manuel_exemples/wtest6.c.pdf similarity index 100% rename from C_Language/semaphores_manuel_exemples/wtest6.c.pdf rename to c/semaphores_manuel_exemples/wtest6.c.pdf diff --git a/C_Language/skel_getopts.c b/c/skel_getopts.c similarity index 100% rename from C_Language/skel_getopts.c rename to c/skel_getopts.c diff --git a/C_Language/squeeze.c b/c/squeeze.c similarity index 100% rename from C_Language/squeeze.c rename to c/squeeze.c diff --git a/C_Language/strdup.c b/c/strdup.c similarity index 100% rename from C_Language/strdup.c rename to c/strdup.c diff --git a/C_Language/strdup2.c b/c/strdup2.c similarity index 100% rename from C_Language/strdup2.c rename to c/strdup2.c diff --git a/C_Language/swapp.c b/c/swapp.c similarity index 100% rename from C_Language/swapp.c rename to c/swapp.c diff --git a/C_Language/testargs.c b/c/testargs.c similarity index 100% rename from C_Language/testargs.c rename to c/testargs.c diff --git a/C_Language/voir.c b/c/voir.c similarity index 100% rename from C_Language/voir.c rename to c/voir.c diff --git a/C_Language/weechat_plugins/Makefile b/c/weechat_plugins/Makefile similarity index 100% rename from C_Language/weechat_plugins/Makefile rename to c/weechat_plugins/Makefile diff --git a/C_Language/weechat_plugins/currentsong.c b/c/weechat_plugins/currentsong.c similarity index 100% rename from C_Language/weechat_plugins/currentsong.c rename to c/weechat_plugins/currentsong.c diff --git a/c/weechat_plugins/libcurrentsong.so b/c/weechat_plugins/libcurrentsong.so new file mode 100755 index 0000000000000000000000000000000000000000..68c2f76154cb71f8f1811f5d9017273e34637290 GIT binary patch literal 10009 zcmcgyeQ;FO6~CKJAXp$Ff}&`7D5=mHRzRhoLKDL3Y6GS~Ix5A-virhr-7ojO#bA|Y z8gy89Vt1IRdiVZOpLX!ab7>A=vjdxA4ai*uLq?oAp+m!VPCcQmMZ;#SrT2xbETC3EnLFr)J zOJ^%NrX)+P?U)s%{wwv89Ya~3DeHY3dKBlEZO%BSLW!n*^{RI9&Nm-j{cz@r8>c+c zuq1hG-Sqc<_Io#lZ6+3AF^&mF+9|Jxlc`DtZp+S5=<~T^lqvigywYZZlMee2`u8NAY)6O`X$K zTbvM^-Q?R|JuX0FG)J=e;}!2LeeEG%>r-#)e|3g+#P&=`PBPQKJ$maW}o@m zp}||OKku>j2j5&2|7h`%n_|gFjy~|_lRY0yKK}CiH0_GbkJZ^gi{)r%;5y=Ua==2X zfLB+*XH>ue3(aX*^&2bTbrtNKRRKQ%JLTe^TS1=A;{_@PC;6m;oewMEBNgy|;8Sn~ zZl9{5XI~RUdvQ#`)tXf}=aM$WSuZ{qDJq;~sp$&u^x*eljO?To&e!d7Ip2xmR@xwF ziip?HZx9p3d2|t@{ZZwamFSb5iOLRN*Bur7E>ZHrBOg<^rto>-sdeKZ`)vy6y%JDy z{!3k{T_lWlrNqZxpR_L;u%n*i2}x=E==!E)I;ERdIBV&;&^zL(IKW6}n7ZLa{5C`A z*KXEV8=K;$Wn^0tVbe5BajRiOVqr_qByyYLDLoZV8eS}%iR+tOT$O%^Ggvww=O)zsZ0+HZ%if)!iIK(=_^q4S zgdXuRifMRg1g-Hc;_0jp4@mwE;%SM8`y~Go@wBwVy^?>Pcv{lo-I6~Ui7 zr&>*f?(DOwMh4_`i`?3~mWnepEJFTR^V&7JjiK(P1CSNg#86@Bbud}V!dj^3{7=Ve zqP3^-1PJWCijmg2Z-)+k>JN1v_l1@Wnp)k=6||UrzEHmA*BEaenffe5X&xBQ9y?NV zFS@>U&EH*rxT9|7HWlB}JuoTS5rB0r#II11PF^4CS$YqKMuzBotUp{VlFS-Rs56wm zV^1ib+nsOU70RzHw&sJ|yYJXlwRQYHTJPgE`{=afgS!gBU7?+!gF}dsqUtZ*^*QE} z4-WMQ>3%GZ&ng5@D2e>xkbnKq0lHR7x)k$w2T%AQa7A#}?XRB}^aqDR{iH2IJ<}TD zFjN3i5QT<(J&?13*uvcdsffR9@ZEk?qqu!3(9~?Y_TO+35eaDH&)_2DY51bxOZhbe@ z6YM1~*TY)L#1A5FDg=80z4~uBh9^;afqHaaN(a#^1RvW^dkG>tz{-g8M{vepfk^3q zErG$G$X;)#uyXJzia(S;3iOvYie3)AeZaAf!KWz(3qXIckDx;E>3p!S5bSFd*bWCz z)!x}xw~c}sGadJA z5SnYHW^NGL1J~qFx()Q&25ztov=+KHkby$`0Hk+^@-IF`(eI}p%t-od9vRq2n|%29 z1R|ok$Hg}LvUnfMNM777R>H;cSqS6}IlNK^;uiV39mUJl8uSICC{ivg)Eu$_JD!z@ z=P05;0OXcdcs2BR13vrpx7ABFPmC4}+~8A|&pY#eZNInrXMT(6qxD$@QHvuovQ6{bxhC_i;}YtN+P zfLeQM{Imc)ljcb>ZK))ets_FSdPxTHTiZW;OO|pCH_kbfM2CDZ-hFDsItTgiWiWL! z!5^=swLywGHIn;)k}IZD#P-I0=4YSaN};=p5XnqLs7EFdOPiLM7ejnPG@4p89!*_j zX}980Nt-omme!h1->ii#&59XXT0X*=+ALvYvv_K2G#gEEanjIcX>Z-PSN1?PfMir_ zoC77Dx^q=Olg?Um;m3??$xKvBU1UHk6E-y?rQu;MoX{@Ur0SLN%4She5Z2(t9yA-)*afue07aW8(N)`X(?N7`;DNLr=aFG*7O-tEy$vxSP8D z{(XK(k(Mp90`v)_pDqGeuIl?zhHQ|(v*AxZ5AgW4qb5j8&@Q7UnKC@%2u(J6Hl)VS zD*WEc&nWypP;HBeeMO!KRR$~(}pgQzmK&_<4`Ppf!(&uNU>9&|$Tk395 z&pk>_XiA>fcf69P?-A6R)cP^rt2zo6MO#dMyPz)n!!pYFi%K3#CVAyfoK*ZOHU6<@ zT$%m96aFscb$rhR8+ky{Unsg?(W8p~S<$~M`njT$)d~8lq5(yh@rhFoht&D;`e)wp zS|t|FU$9{Q;)RRm&0oO7r}tl2OXkct?LF*d?7OVo(m5-hh@0V*h20(@rEi6^kyt9H zU3qgjWdyS6wAHjJ8IC6ck#usIm>*amu5N3+1mCt=S}xb-;0xDW?b5)azyi&7zF>(q zCzCa@M#2c2#$2!1LLma?mZTNl2x?_*8slCnZ5e@0sa#-VE}n?ai${gzVqr5T0?{og zXxh}u+9UiDD#a9|V+`)Yq@a44ge3y<-7sJoo#@MVYD`YP3kHms-jT)YvL1^_2g7Jk}2+BFE&w0s9DSeR)`{#Vo z1dQ@O>vNuC%6SbUvT+_^K7!!gQGuQ~czc<5#e} zcaUw?=RC=j^CbIceV#u(Zaeik?=s~)O)|93Uj0sB6c^tY_&&pw{Xj%Ej)Qp<9jAV$ z%3DkaSWr>c=Wh{PJ^EaaVA{zyFs09WY<8PRpYMxIo$v0X!~R+SZl%xbKPYeFLNNW9 z1r_D>V|a&0-&;SJ&4P-0{qOeZpHdTKO7n9zum8Omr1hsgK#l7vU8-*4T`#ZxqtJ2c z7pG`sMijrK{yxY$^>-`%-Ado<&&xjpeY*BIe!h=#-G}oTUk0qt^E%@3zgXP|7oUj% zv^h2z{bhZoFJQzOKR@SeQ2Mk#oQ?IEzJfugKHrCjl>SbqGWwc_e*-+(;`#IU?oRb! z<=ubmm(BbI9r8b)0YzDVu?HtvYE0=gv2Qt`etMPvk`qLq^%y3e_YPx32kF5WO;gWl z#9oYpKO*M)n;Z9!J~zAZ>e1(AH(oRP zTxvqs-n-1ym} z-__mtbiw=1jZ>A=-RSzOM!m|7+V5#qcw6K97LUt!%rf#9LBNL!5$9``r`m!~j9s4= ziH}{MHsItp<9Q$Gkn*SJ#rr0w@UE#EdZ+heH~M7fq{mLB_ihsN3JnoWsz35c= zAFOQleQIp{k7Jbl7S(-MiNkjJb^cuiobsp->&*F^?VObO*z^9G#2ds;PyAF5COh8i z?M&beY}7#;B|f(9xVVD+stS0x0&W7=9R9dVRfcl-y}--Gxfgi3y6lruerz5%P{GcN z74TycA6sYrw1WI3+%(G7U*`b7fG6poD}a}q*LRd1Z(TVFoa)NneZ8fEogQV!Ti<<9 z;okc0(+c<2cV7ZtuAcom@N)4FOMIg6)`LG&cD(Ud<9=AK{yhVDLz%yC5cEDv@38@V zCqy09Q8gBktYuocjt&gzddu4DR_m?TtXWINWPOE;ySBwK6iw@!66uZMgf8EB^>D6J z;B7XOFf1b)Saj) zw!NG#4O7Thw_dlrxmCaJs;kxn*XnDVm$wEf^r)HEW8qXZf%>;S4`p-34Xc`0Ueh8A z#!XGma;~Q)PNiV3AG-x*#n}x}wb_k$EAwTF@OHV{t>z9w74)f~?H03(;cl#a*_ +#include +#include + +#define TAILLE 5 +#define TAILLE_CHAINE 20 +#define TAILLE_BUFFER_CURRENT_SONG 200 +#define TAILLE_OPTIONS 20 + +int main(int argc, char * argv[]) +{ + int i,status; + int p[2]; + char ** cmd; + char * song; + char * affichage; + cmd = (char **) malloc(sizeof(char*) * argc+1); + if(argc > 3) argc = 3; + for(i = 0 ; i < argc + 2 ; i++) + cmd[i] = malloc(sizeof(char*) * TAILLE_OPTIONS); + free(cmd[i-1]); + cmd[i-1] = (char *)0; + strcpy(cmd[0],"mpc"); + strcpy(cmd[i-2],"current"); + if(argc == 3) + { + strcpy(cmd[1],"-h"); + strcpy(cmd[2],argv[2]); + } + + song = malloc(TAILLE_BUFFER_CURRENT_SONG*sizeof(char)); + affichage = malloc((TAILLE_BUFFER_CURRENT_SONG + 10) * sizeof(char)); + + for(i = 0 ; i < TAILLE_BUFFER_CURRENT_SONG ; i++) + song[i] = '\0'; + for(i = 0 ; i < TAILLE_BUFFER_CURRENT_SONG + 10 ; i++) + affichage[i] = '\0'; + + pipe(p); + if(fork() == 0) + { + close(p[0]); + close(0); close(2); + dup2(p[1],1); + execvp("mpc", cmd); + } + close(p[1]); + read(p[0], song, TAILLE_BUFFER_CURRENT_SONG); + close(p[0]); + wait(&status); + if(WEXITSTATUS(status) != 0) + sprintf(song,"didn't worked !!!"); + sprintf(affichage,"/me ♪ %s", song); + + //sprintf(affichage,"/me ♪ %s%s", weechat_color ("_red"), song); // Ne s'affiche pas correctement chez les autres + //weechat_utf8_normalize(affichage, '?'); // Pour ne pas avoir de caractères non-lisibles + + printf("AFFICHAGE : %s\n",affichage); + free(song); // :') + for(i = 0 ; i < argc ; i++) + free(cmd[i]); + free(cmd); + + return EXIT_SUCCESS; +} + diff --git a/C_Language/weechat_plugins/weechat-plugins.h b/c/weechat_plugins/weechat-plugins.h similarity index 100% rename from C_Language/weechat_plugins/weechat-plugins.h rename to c/weechat_plugins/weechat-plugins.h diff --git a/C_Language/wordcount.c b/c/wordcount.c similarity index 100% rename from C_Language/wordcount.c rename to c/wordcount.c diff --git a/perl/LeLangagePerl.txt b/perl/LeLangagePerl.txt new file mode 100644 index 0000000..4ddf627 --- /dev/null +++ b/perl/LeLangagePerl.txt @@ -0,0 +1,26 @@ +Le langage Perl + +Variables : + Scalaires : $ + Structurées : tableaux : @ + table de hash : % + + +Langage contextuel = ne pas définir de type de variable + +$_ = variable par défaut + +exemple : + $prenom = "Eric" + print "$prenom\n"; + print $prenom."\n"; + print $prenom,"\n"; + print '$prenom\n' + +Autre exemple : +#!/usr/bin/perl + +while(<>) +{ + print; +}; diff --git a/perl/antipixel/.MyWrapper.pm.swp b/perl/antipixel/.MyWrapper.pm.swp new file mode 100644 index 0000000000000000000000000000000000000000..8feec9c563aabf00b3872a97322ee30cb66e09cf GIT binary patch literal 12288 zcmeI2Ply|J6vuz{4-&Pt+KY!GFKNnTA)9QrT`L<~DvDBYEeO?u)G(R+CYkPJX88SP z_77q8B2+vJUOb4NJPW;e@X(t|!DGF95)l;fR{Z{c`OWS&*=~iNlsD`*llNfC(@GCcp%k025#W|2qPCc0_!LsvdEbopt9U zGiUdaPfUObFaajO1egF5U;<2l2`~XBzyz4Ue~^Gb5aQ7%h4>vZ|Nk$)|Nr)k5Whfo zpdX;`pqtQF(3emMNoWAQ4*h*hh}+N&=zXXIJqG=F6#Jp?p_|Y*(C5%c&=|T3y$sc$ z7od~Sap>;TLi`Nffxd-qK+DkGr-b+kx($5>eG2uUI#h$6haQLiLOp*%f4JH{!TAzY zf%sqoOn?b60Vco%m;e(1flgP59Z}K#Hr3v~@)lLA)mm3n#@kfaG7jlH=}{EsU7?FU zsUo4to_{|sd0>dn13l)e+!3dyRD!gKWuba~KUg2Cv`7ZDN;PUt0WDsb zw|8f^MoBJJA`jl@jDU_lOjEw;lZ#6Ab-7Ja=Wg%yG)fv?lRRqD#rlSi4lH2jL{v6M zQ7jvT#x?AoCOI=&DE(kWr(H_*-8nF8%s1L#d@4f~X*z#_-s_xQYEt=f4VHfFCxJCBudFnwe7V+y zElDF~P1s}p?Ba%0dAVr4r^}e8q1=nJ>y95r7o|HEvBN}}*n64uP;vo%4O2Dt?PYk{!_=f%9;Hdy%>DC?q8l_V-cy@q z)(%MG=5{tP%||ZBea7= zbER8fkROIoFp>&s_tj}B)Nbvt|FbDDF2e&${fO(WcPWhO?Aq;WitJ$lJJ|ipVBLYG=6?CgrhmQp*RC@-$Y7@TQ^D%B?X8 z0SHtHcy|*WE>pX;*DT7mHtTF-{i13G<{$t82tWV=5P$##AOL}XCg609p2D3L%6l!9 zeeG9YrsyC50SG_<0uX=z1Rwwb2tWV=5ST-O_?l>cl}Lvu{{K(E|Gz^15#l|>TZoqs z&mrzZOls%wt~fFTAOHafKmY;|fB*y_009U<;LilMa}(?E$UQnSUhV95Xg1)4b+#B9 zj@fjS9kcHEYPv*;yq8Ni=w;f;OihZt6|<5K6=@zDCDpC{$*eOnaUI&Kb8ijrOT~p6 JvErdUqi>* ( is => 'ro', builder => '_build_colors' ); + + +option mess => ( is => 'rw', + doc => 'message', format => 's', default => sub { 'message à afficher' } ); +option couleur_externe => ( is => 'rw', + doc => 'couleur externe', format => 's', default => sub { 'bleu' }); +option couleur_interne => ( is => 'rw', + doc => 'couleur interne', format => 's' ); +option couleur_background => ( is => 'rw' , + doc => 'couleur du fond (écriture)', format => 's'); + + +sub _build_colors { + { + bleu => [0, 0, 255], + rouge => [255, 0, 0], + vert => [0, 255, 0], + noir => [0, 0, 0], + blanc => [255, 255, 255], + gris => [140, 140, 140] + }; +} +sub tests { + my ($self) = @_; + my %couleurs = %{$self->couleurs}; + + say "mess : " . $self->mess; + say "couleur_externe : " . $self->couleur_externe; + say "Cette couleur n'existe pas !" unless exists $couleurs{$self->couleur_externe}; + say "couleurs : " . join( ', ' , keys %couleurs) ; + while( my ($key , $value) = each %couleurs) + { + say "La couleur $key est : " . join(', ' , @$value); + } +# say "couleur_interne : " . $self->couleur_interne; +# say "couleur_background : " . $self->couleur_background; +} +sub run { + my $self = shift; + say "RUN !!!"; +} + +1; diff --git a/perl/antipixel/gd_image.pl b/perl/antipixel/gd_image.pl new file mode 100644 index 0000000..fe6e4ed --- /dev/null +++ b/perl/antipixel/gd_image.pl @@ -0,0 +1,36 @@ +#!/usr/local/bin/perl + +use GD; + +my $x = 100; +my $y = 15; +my $intersection = $x - 30; +my $espace_entre_mots = 2; +my $w1 = "Alsace"; +my $w2 = "Réseau"; +my $w3 = "Neutre"; + +# create a new image +$im = new GD::Image($x,$y); + +# allocate some colors +$grey = $im->colorAllocate(140,140,140); +$white = $im->colorAllocate(255,255,255); +$black = $im->colorAllocate(0,0,0); +$red = $im->colorAllocate(255,0,0); +$blue = $im->colorAllocate(0,0,255); + +# make the background transparent and interlaced +#$im->transparent($white); +$im->interlaced('true'); + +# Put a black frame around the picture +$im->rectangle(0, 0, $x -1, $y -1, $black); +$im->filledRectangle(1, 1, $x -2, $y -2, $white); +$im->filledRectangle(2, 2, $intersection - $espace_entre_mots, $y -3, $red); + +# make sure we are writing to a binary stream +binmode STDOUT; + +# Convert the image to PNG and print it on standard output +print $im->png; diff --git a/perl/antipixel/lanceur.pl b/perl/antipixel/lanceur.pl new file mode 100644 index 0000000..07d7288 --- /dev/null +++ b/perl/antipixel/lanceur.pl @@ -0,0 +1,8 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use MyWrapper; +my $wrapper = MyWrapper->new_with_options(); +$wrapper->tests(); +$wrapper->run(); + diff --git a/PERL_Language/chrono.pl b/perl/chrono.pl similarity index 100% rename from PERL_Language/chrono.pl rename to perl/chrono.pl diff --git a/PERL_Language/daemon.pl b/perl/daemon.pl similarity index 100% rename from PERL_Language/daemon.pl rename to perl/daemon.pl diff --git a/PERL_Language/enMajuscule.pl b/perl/enMajuscule.pl similarity index 100% rename from PERL_Language/enMajuscule.pl rename to perl/enMajuscule.pl diff --git a/PERL_Language/eratosthene.pl b/perl/eratosthene.pl similarity index 100% rename from PERL_Language/eratosthene.pl rename to perl/eratosthene.pl diff --git a/perl/essai.perl b/perl/essai.perl new file mode 100755 index 0000000..9a2c370 --- /dev/null +++ b/perl/essai.perl @@ -0,0 +1,18 @@ +#!/usr/bin/perl +while(<>) +{ + if($_ =~ "Salut") + { + print "OK\n"; + } +}; + +while(<>) +{ + print if $_=~/"Bonjour"/; +}; +# Encore plus simple !! +while(<>) +{ + print if /"Bonjour"/; +}; diff --git a/perl/essai2.perl b/perl/essai2.perl new file mode 100755 index 0000000..ebd14aa --- /dev/null +++ b/perl/essai2.perl @@ -0,0 +1,16 @@ +#!/usr/bin/perl +# Tableaux +@tab1 = ("lu", "ma", "me"); +@tab2 = @tab1[1,2]; +@tab2 = @tab1; +print $tab[0]; +print $#tab1; # $# = index du dernier élément +$tab1[3] = "Je"; +$tab1[30] = "Mon Langage Perl"; + +$#tab $_ + +@ARGV + +$ARGV[0] # Le premier argument saisi +$#ARGV diff --git a/perl/essai3.perl b/perl/essai3.perl new file mode 100755 index 0000000..03f6f0d --- /dev/null +++ b/perl/essai3.perl @@ -0,0 +1,24 @@ +#!/usr/bin/perl + +# Exercices tableaux +@alphabet = ("a" .. "z"); +@cartes = ("01".."10","valet","dame","roi"); +@annee=("a1","a2","lp"); +@promo=@annee; +@tout = (@alphabet , "dut" , @cartes , 1145, "\n"); + +print @tout; + +# Autre exercice + +@jours=("Lundi","Mardi","Mercredi"); + +foreach $jours(@jours) +{ + print $jours."\n"; +} + +# Perl : les nombres : < > <= >= == != +# Chaînes : lt gt eq ne + +# !~ et =~ sont des opérateurs d'appartenance diff --git a/PERL_Language/getpwent.pl b/perl/getpwent.pl similarity index 100% rename from PERL_Language/getpwent.pl rename to perl/getpwent.pl diff --git a/PERL_Language/getpwent2.pl b/perl/getpwent2.pl similarity index 100% rename from PERL_Language/getpwent2.pl rename to perl/getpwent2.pl diff --git a/perl/grep.pl b/perl/grep.pl new file mode 100755 index 0000000..8e62e71 --- /dev/null +++ b/perl/grep.pl @@ -0,0 +1,21 @@ +#!/usr/bin/perl -w +# -w pour les erreurs + +$motif = shift(@ARGV); +# $motif=$ARGV[0] +#Shift + +# Manière non explicite +while(<>) +{ + if(/$motif/) { print ; }; +}; + +# Manière explicite +while($ligne = <>) +{ + if($ligne =~ /$motif/) + { + print $ligne; + } +}; diff --git a/perl/grep2.pl b/perl/grep2.pl new file mode 100755 index 0000000..059b7a0 --- /dev/null +++ b/perl/grep2.pl @@ -0,0 +1,14 @@ +#!/usr/bin/perl + +$motif=$ARGV[0]; +shift; +foreach $f (@ARGV) +{ + open(F,"<$f") || die "Impossible de lire le fichier $f : $!"; + + while() + { + if(/$motif/) + { print "Motif trouvé dans $f : $_ \n";} + }; +} diff --git a/PERL_Language/humanornot.pl b/perl/humanornot.pl similarity index 100% rename from PERL_Language/humanornot.pl rename to perl/humanornot.pl diff --git a/PERL_Language/humanornot2.pl b/perl/humanornot2.pl similarity index 100% rename from PERL_Language/humanornot2.pl rename to perl/humanornot2.pl diff --git a/perl/image.png b/perl/image.png new file mode 100644 index 0000000000000000000000000000000000000000..a069d6e19d68c275b981c450681718f6f3663f23 GIT binary patch literal 173 zcmeAS@N?(olHy`uVBq!ia0vp^DL~B6!py+HIQ@rv28a{j6XM#_)ARrTe;^Np8UA1H z)XfIck)AG&AsQ2t1DKdu*;12}lbszI**NAOlsLoM-PE{1A%Jh{@)i~miG-lG1j`zm z9hxT&DL72)5z=dLcayklvLex`*@12QYEf2C7AKyr7uOOP4kxZ{eImfjP;HwvTXyl$ PGLUVau6{1-oD!M<9e6b% literal 0 HcmV?d00001 diff --git a/PERL_Language/lePlusGros.pl b/perl/lePlusGros.pl similarity index 100% rename from PERL_Language/lePlusGros.pl rename to perl/lePlusGros.pl diff --git a/PERL_Language/max.pl b/perl/max.pl similarity index 100% rename from PERL_Language/max.pl rename to perl/max.pl diff --git a/PERL_Language/maxcourt.pl b/perl/maxcourt.pl similarity index 100% rename from PERL_Language/maxcourt.pl rename to perl/maxcourt.pl diff --git a/PERL_Language/mirroir.pl b/perl/mirroir.pl similarity index 100% rename from PERL_Language/mirroir.pl rename to perl/mirroir.pl diff --git a/PERL_Language/multi_chrono.pl b/perl/multi_chrono.pl similarity index 100% rename from PERL_Language/multi_chrono.pl rename to perl/multi_chrono.pl diff --git a/PERL_Language/nbmots.pl b/perl/nbmots.pl similarity index 100% rename from PERL_Language/nbmots.pl rename to perl/nbmots.pl diff --git a/PERL_Language/rappels.pl b/perl/rappels.pl similarity index 100% rename from PERL_Language/rappels.pl rename to perl/rappels.pl diff --git a/PERL_Language/silent_cmp.pl b/perl/silent_cmp.pl similarity index 100% rename from PERL_Language/silent_cmp.pl rename to perl/silent_cmp.pl diff --git a/PERL_Language/tube.pl b/perl/tube.pl similarity index 100% rename from PERL_Language/tube.pl rename to perl/tube.pl diff --git a/perl/wc.pl b/perl/wc.pl new file mode 100755 index 0000000..680382e --- /dev/null +++ b/perl/wc.pl @@ -0,0 +1,15 @@ +#!/usr/bin/perl -w + +# Utilisation : wc.pl fichier + +open(F, "<$ARGV[0]") || die "Problème d'ouverture de fichier ! "; + +$i = 0 ; +while() +{ + $i++; +}; + +close(F); + +print "Nombre de lignes : $i \n";