Perl 5 Quiz Chemnitz Edition
0 gefällt mir1,010 aufrufe
Extra brutales quiz, rund um Perl 5.16, Introspektion, und einige kaum beachtete Nischen von Perl 5
![Wie viele Elemente ?
my @prim;
$prim[1] = 2;
say scalar @prim;](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-46-320.jpg)
![Erstes hat Index 0
$prim[1] = 2;
say scalar @prim;
2](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-47-320.jpg)
![Nun ist 1 Erster
$[ = 1;
$prim[1] = 2;
say scalar @prim;
1](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-48-320.jpg)
![Unter 5.14
$[ = 1;
$prim[1] = 2;
say scalar @prim;
1](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-49-320.jpg)
![Was macht „undef ~~ %ash“ ?
7 ~~ [2,7,5]](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-71-320.jpg)
![Was macht „undef ~~ %ash“ ?
7 ~~ [2,7,5]
1](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-72-320.jpg)
![Was macht „undef ~~ %ash“ ?
qr/^b/ ~~ ['habe','basta']
1](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-73-320.jpg)
![Was macht „undef ~~ %ash“ ?
undef ~~ [2,undef,5]](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-74-320.jpg)
![Was macht „undef ~~ %ash“ ?
undef ~~ [2,undef,5]
1](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-75-320.jpg)
![Referenzarten ?
SCALAR ARRAY HASH
ref ““ ref [] ref {}](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-104-320.jpg)
![Tip:
say ((caller(0))[0])](https://image.slidesharecdn.com/p5quizechemnitz-130317191731-phpapp01/85/Perl-5-Quiz-Chemnitz-Edition-123-320.jpg)
Anzeige
Weitere ähnliche Inhalte
Was ist angesagt? (20)
Andere mochten auch (17)
Anzeige
Ähnlich wie Perl 5 Quiz Chemnitz Edition (20)
Anzeige
Mehr von lichtkind (17)
Perl 5 Quiz Chemnitz Edition
- 1. Perl Quiz
- 2. Kamelbuch
- 3. Kamel
- 5. Was, ich bin tot?
- 9. Perl 5 Quiz
- 10. Perl 6 unterwegs
- 11. Perl 6 ? - Frag mich!
- 12. Hochstapler bei der Arbeit
- 13. Hochstapler bei der Arbeit
- 14. Hochstapler bei der Arbeit Wikipedia, Perl-Wikis, Perl 6 Tablets Perl-Magazin, Perlzeitung, heise.de Vorträge, CPAN-Module, Kephra, WxPerlBuch
- 15. Mansfelder Land
- 16. Mansfelder Land
- 17. Egypt aka Khem
- 18. Dresden 2005
- 19. 2011
- 20. 5.14.1
- 21. 11 März 2013 Perl 5.16.3
- 25. Keine Entschuldigung Perl 5.16 App::perlbrew !
- 26. Welches deref. nicht ? each keys join splice
- 27. Welches deref. nicht ? join
- 28. Nicht Bei Jauch
- 30. Testfrage
- 31. Was tut „less“ ?
- 32. Das „less“ - Pragma ? use less '...';
- 33. Gibt es das wirklich ? use less 'memory';
- 34. Sicher Digger ! use less 'memory'; if ( less->of( 'CPU' ) ) { ... } elsif ( less->of( 'memory' ) ) { ... }
- 35. Antwort: Nichts (legacy idea)
- 36. 10 Fragen: Aktuell: 5 Introspektion: 3 Kurios: 2
- 37. Fangen Wir An
- 38. Frage 1 ! ???
- 39. Geht Das ? use v5.16; use v5.8; say 'Booh';
- 40. Leider Ja, ... use v5.16; use v5.8; say 'Booh';
- 41. ..., aber nicht ab 5.18 use v5.16; use v5.8; say 'Booh';
- 42. Geht Das ? Es Geht !
- 43. Geht Das ? Es Geht (noch) !
- 44. Frage 2 ! ???
- 45. Was macht das ? $[ = 1;
- 46. Wie viele Elemente ? my @prim; $prim[1] = 2; say scalar @prim;
- 47. Erstes hat Index 0 $prim[1] = 2; say scalar @prim; 2
- 48. Nun ist 1 Erster $[ = 1; $prim[1] = 2; say scalar @prim; 1
- 49. Unter 5.14 $[ = 1; $prim[1] = 2; say scalar @prim; 1
- 50. Unter 5.16 Error
- 51. Unter 5.16 use feature 'array_base';
- 53. Frage 3 ! ???
- 54. Wie viele solcher brachte 5.16? use feature 'array_base'; $[
- 55. Wie viele solcher brachte 5.16? use feature 'fc';
- 56. Wie viele solcher brachte 5.16? use feature 'fc'; fc $str; # fold case
- 57. Wie viele solcher brachte 5.16? use feature 'unicode_eval';
- 58. Wie viele solcher brachte 5.16? use feature 'unicode_eval';
- 59. Sieht $str als Unicode use feature 'unicode_eval'; eval $str;
- 60. Sieht $str immer als Bytes use feature 'evalbytes';
- 61. Sieht $str immer als Bytes use feature 'evalbytes'; evalbytes $str;
- 62. Wie viele solcher brachte 5.16? use feature 'current_sub';
- 63. Referenz auf aktuelle sub use feature 'current_sub'; __SUB__
- 64. Geh zurück zu 5.8 use feature ':5.16';
- 65. Geh zurück zu 5.8 use feature ':default';
- 66. Bedeutet das Gleiche use feature ':default'; no feature ':all';
- 67. Wie viele solcher brachte 5.16? 8
- 68. Wie viele solcher brachte : 5.10: 3 (3) 5.12: 1 (3) 5.14: 0 (1) 5.16: 5 (8)
- 69. Frage 4 ! ???
- 70. Was ergibt „undef ~~ %ash“ ? ?
- 71. Was macht „undef ~~ %ash“ ? 7 ~~ [2,7,5]
- 72. Was macht „undef ~~ %ash“ ? 7 ~~ [2,7,5] 1
- 73. Was macht „undef ~~ %ash“ ? qr/^b/ ~~ ['habe','basta'] 1
- 74. Was macht „undef ~~ %ash“ ? undef ~~ [2,undef,5]
- 75. Was macht „undef ~~ %ash“ ? undef ~~ [2,undef,5] 1
- 76. Was macht „undef ~~ %ash“ ? 2 ~~ {2 => 5}
- 77. Was macht „undef ~~ %ash“ ? 2 ~~ {2 => 5} 1
- 78. Was macht „undef ~~ %ash“ ? undef ~~ {undef => 5}
- 79. Was macht „undef ~~ %ash“ ? undef ~~ {undef => 5} Key ist 'undef'
- 80. Was macht „undef ~~ %ash“ ? undef ~~ {undef, 5}
- 81. Was macht „undef ~~ %ash“ ? undef ~~ {undef, 5} trotzdem undef in Str Kontext umgewandelt
- 82. Was macht „undef ~~ %ash“ ? undef ~~ {undef, 5} 5 wird unter '' abgelegt say $h{''};
- 83. Was macht „undef ~~ %ash“ ? undef ~~ {undef, 5} 5 wird unter '' abgelegt undef ne '' (immer)
- 84. Was macht „undef ~~ %ash“ ? Keine Suche kann erfolgreich sein.
- 85. Was macht „undef ~~ %ash“ ? undef
- 86. Frage 5 ! ???
- 87. Wohin geht COMMIT ?
- 88. Wohin geht COMMIT ? COMMIT
- 89. Vollständiger Syntax ...(*COMMIT)...
- 90. Niemals ohne !
- 91. Zero Length Assertion …($= ...)... …($<= ...)... ...(?(DEFINE) ...)...
- 92. Steuern Backtracking ...(*ACCEPT)... ...(*COMMIT)... ...(*FAIL)... ...(*MARK)... ...(*PRUNE)... ...(*SKIP)... ...(*THEN)...
- 93. Unterbricht Backtrack ...(*ACCEPT)... ...(*COMMIT)...
- 94. Unterbricht Backtrack # Erfolg ...(*ACCEPT)... # Mißerfolg ...(*COMMIT)...
- 95. Backtracking /d(a|ak)ch/ dackel
- 96. 'h' ne 'k' /d(a|ak)ch/ 'dackel'
- 97. Mit COMMIT /d(a|ak)(*COMMIT)ch/ 'dackel'
- 98. Mißerfolg /d(a|ak)(*COMMIT)ch/ 'dackel'
- 99. Ab 5.10 Bricht Regex während Backtracking als Mißerfolg ab
- 100. Frage 6 ! ???
- 101. Zähl Rückgabewerte von ref ? ref …;
- 102. Ohne Diese: ref $obj 'Klassen::Name'
- 103. Referenzarten ? ?
- 104. Referenzarten ? SCALAR ARRAY HASH ref ““ ref [] ref {}
- 105. Referenzarten ? SCALAR ARRAY HASH CODE REF ““ ref sub {}; ref ““; ref ““
- 106. Referenzarten ? SCALAR ARRAY HASH CODE REF ““ ref qx// eq „Regexp“
- 107. Referenzarten ? SCALAR ARRAY HASH CODE REF ““ ref *var{GLOB} eq “GLOB“
- 108. Referenzarten ? SCALAR ARRAY HASH CODE REF ““ ref v5.6 eq “VSTRING“
- 109. Namen der Referenzarten ? ““ VSTRING SCALAR ARRAY HASH IO CODE Regexp Format REF GLOB 11
- 110. Wieviele Werte hat ref ? 11
- 111. Frage 7 ! ???
- 112. Ref-Arten in Symboltabelle ? ?
- 113. Ref-Arten in Symboltabelle ? *varname{SCALAR}
- 114. Namen der Referenzarten ? ““ VSTRING SCALAR ARRAY HASH CODE Regexp IO Format REF GLOB 11
- 115. Namen der Referenzarten ? ““ VSTRING SCALAR ARRAY HASH CODE Regexp IO Format REF GLOB 11
- 116. Ref-Arten in Symboltabelle ? SCALAR ARRAY HASH CODE Regexp IO FORMAT GLOB 8
- 117. Ref-Arten in Symboltabelle ? SCALAR ARRAY HASH CODE FORMAT IO GLOB 7
- 118. Ref-Arten in Symboltabelle ? 7
- 119. Frage 8 ! ???
- 120. Wie viele Werte liefert caller?
- 121. Wie viele Werte liefert caller ! package, filename, line, subroutine, hasargs, wantarray, evaltext, is_require, hints, bitmask, hinthash
- 122. Wie viele Werte liefert caller ! 11
- 124. Frage 9 ! ???
- 125. Wozu braucht man -s ? ?
- 126. Kommandozeilenparameter perl -s test.pl -var=2
- 127. So NICHT ! perl test.pl -s -var=2
- 128. So auch nicht ! perl -s -var=2 test.pl
- 129. Nur So !!! perl -s test.pl -var=2
- 130. Im Programm perl -s test.pl -var=2 say $var; 2
- 131. var Ist aber global perl -s test.pl -var=2 also: no strict;
- 132. Wozu braucht man -s ? Zur Einführung von Variablen ins Programm aus der Shell !
- 133. Frage 10 !
- 134. Was verändert reset ?
- 135. Löscht alle Var reset 'A-Z'; !!!
- 136. Löscht alle Var keine mit my oder state deklarierten
- 137. Löscht alle Var keine mit my oder state deklarierten my $d = 5; my $e = *d{SCALAR}; say $$e; # kommt nix
- 138. Löscht alle Var keine mit my oder state deklarierten nur globale oder mit local
- 139. Löscht alle Var keine mit my oder state deklarierten nur globale oder mit local, our
- 140. Globale Abgeschaltet use v5.12; use strict; nur globale oder mit local, our
- 141. Globale Abgeschaltet use v5.12; no strict 'refs'; nur globale oder mit local, our
- 142. „lokale“ sind legacy use v5.12; no strict 'refs'; nur globale oder mit local, our
- 143. Löscht Var in Symbolt. reset 'A-Z'; # doch ni schlimm? nur globale oder mit local, our
- 144. Löscht Var in Symbolt. reset 'A-Z'; # doch ni schlimm? löscht auch: %ENV, @INC, @ISA, etc.
- 145. Was verändert reset ? besser: undef $var;
- 146. Was verändert reset ? setzt jede $var auf undef (Zustand vor Benutzung)
- 147. Was verändert reset ? setzt Variablen in Symboltabelle mit angegebenen Anfangsbuchstab en auf undef