1 / 30

Introdução ao Perl Apresentado por: Mário Silva marricardo@gmail

Introdução ao Perl Apresentado por: Mário Silva marricardo@gmail.com. Roadmap. O que é o Perl Perl para iniciantes Programa “Hello World” Tipos de dados TIMTOWDI Hello World Estruturas de controlo Regex (Regular Expressions) ‏ Funções. O que é o Perl.

rianne
Download Presentation

Introdução ao Perl Apresentado por: Mário Silva marricardo@gmail

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript


  1. Introdução ao PerlApresentado por:Mário Silvamarricardo@gmail.com

  2. Roadmap O que é o Perl Perl para iniciantes Programa “Hello World” Tipos de dados TIMTOWDI Hello World Estruturas de controlo Regex (Regular Expressions)‏ Funções

  3. O que é o Perl Linguagem de programação estável e multiplataforma Criada em 1987 por Larry Wall Especialmente eficaz no tratamento de Strings Permite tempos de desenvolvimento curtos Lema do Perl: There Is More Than One Way to Do It (TIMTOWDI)‏

  4. Perl para iniciantes

  5. Hello World Códigoprint 'Hello World!' Resultado Hello World!

  6. IDE Eclipse Epic

  7. Tipos de dados 3 tipos de variaveis Escalares my $scalar; Arrays my @array; Hashes my %hash;

  8. Escalares Código my $str; my $num; $str = 'Tomar.pm'; $num = 1; print 'O grupo ',$str, ' é o numero ', $num; Output O grupo Tomar.pm é o numero 1

  9. Arrays Código my @array; $array[0] = 'Tomar.pm'; $array[1] = 1; print 'O grupo', $array[0],' é o numero ', $array[1]; Output O grupo Tomar.pm é o numero 1

  10. Hashes Código my %hash; $hash{nome} = 'Tomar.pm'; $hash{num} = 1; print 'O grupo ',$hash{nome},' é o numero ',$hash{num}; Output O grupo Tomar.pm é o numero 1

  11. O valor undef Código my $value; if (defined $value) { print 'está definido'; } else { print 'indefinido'; } Output indefinido

  12. TIMTOWDI

  13. Hello World Na consola: perl -e 'print "Hello World!!\n"' Resultado Hello World!! Conhecido como “one liners”

  14. Hello World Ficheiro helloWorld.pl: Código print 'Hello World!!”; Executar o programa perl helloWorld.pl Resultado Hello World!!

  15. Hello World Código mais comum: #!/usr/bin/perl print “Hello World!!\n”; Executar chmod +x helloWorld.pl ./helloWorld.pl

  16. Estruturas de controlo If ... elsif .. else if ($esta_a_nevar) { print “leva a samarra”; } elsif ($esta_a_chover) { print “leva o guarda chuva”; else { print “vai de calcoes e t-shirt”; }

  17. Estruturas de controlo Comando for for (my $i=1; $i<10; $i++) { print $i; }

  18. Estruturas de controlo Comando for my @nums = 1..10; for my $i (@nums) { print $i; }

  19. Estruturas de controlo Comando for my @nums = 1..10; for (@nums) { print $_; # igual a print;}

  20. Estruturas de controlo Comando whilemy $counter = 1; while ( 1 ) { print "Estou em loop infinito"; $counter++; if ($counter==6) { last; # last = java break } } print 'o contador esta com ', $counter; Output o contador esta com 6

  21. Estruturas de controlo Comando whilemy $counter = 1; while ( 1 ) {print "Estou em loop infinito"; last if ++$counter == 6; } print "o contador esta com ", $counter; Output o contador esta com 6

  22. Estruturas de controlo Modificadores de espressões if ($temp > 20) { print “Esta calor”; } Em vez disso: print “Esta calor” if ($temp > 20);

  23. Estruturas de controlo Modificadores de expressãoprint “Esta calor if ($temp > 20);print “$_\n” for (1..10);print “$i++\n” while ($i<10);

  24. Estruturas de controlo Operador ternário ($num == 1) ? print “E igual a 1” : print “Nao e igual a 1”; Outro exemplo:my $size = ($width < 10) ? 'small' : ($width < 20) ? 'medium' : ($width < 50) ? 'large' : 'extra-large'; #default

  25. Estruturas de controlo Comparação com if .. elsif .. else if ($width < 10) $size = “small”; } elsif ($width < 20) { $size = “medium”; } elsif .... } else { $size = “extra-large”; }

  26. Regex Código: my $texto = 'Ola mundo'; print ($texto =~ /ola/); Resultado 1

  27. Regex Código my $texto = 'Ola mundo'; $texto =~ s/mundo/IPT/; print $texto; Resultado Ola IPT

  28. Funções Código &func('ola ', 'mundo'); sub func { my ($param1, $param2) = @_; print “$param1 $param2”; } Output ola mundo

  29. Referências Randal Schwartz, Tom Phoenix, brian d foy,Learning Perl, 4ª edição, O'Reilly, 2005

  30. Dúvidas

More Related