Gotanda.pm #1

Python使いから見たPerl @ Gotanda.pm #1

Transcript

1. 1ZUIPO࢖͍͔Βݟͨ1FSM (PUBOEBQN
   
 !NJIZBFSV
2. ࣗݾ঺հ w ϛώϟΤϧ
   !NJIZBFSV
   w 1ZUIPO
   0CKFDUJWF$ śƂŠƃٙ࿭ 
 1FSM
   w ΏͱΓ7JNNFS
   w ζϰΟζμʔઓಆһ
3. Α͘--ͬͯҰׅΓʹ͞ΕΔ͠
 1ZUIPOΘ͔Ε͹༨༟Ͱ͠ΐ
4. ͭ
   1FSM
5. sub say_hello { my $name = shift; ! print "Hello, $name\n"; }
6. ͋ΕͬʁҾ਺͸ʁ TIJGUͬͯͳΜ΍ͶΜ
7. sub sum_numbers { my $sum; for (@_) { $sum += $_; } ! return $sum; }
8. Μͬʁ
9. $_ @_
10. @_ͱ͔$_ͱ͔Ͳ͔͜ΒདྷͨΜ΍ ͳΜ͡Ό͍͜ΓΌʔʂ
11. ࠷ॳʹࢥͬͨෆຬ w มͳه߸ଟͯ͘ҙຯෆ໌
    w ίϯςΩετʁʁʁ
    w ຖճ
    NZ
    ͬͯॻ͘ͷ໘౗͍͘͞
    w ਅِ஋Σʜʜ
    w ϦϑΝϨϯεपΓ͕Θ͔Γʹ͍͘
    w Ҿ਺Ϧετ͸Ͳ͜ʂʁ ʜଞʹ΋͔͋ͬͨ΋͚ͩͲ๨Εͨ͆
12. มͳه߸ଟͯ͘ҙຯෆ໌ $_ @_ 1ZUIPOͰ͸͜ΜͳʹढจΊ͍ͨม਺͸ग़ͯ͜ͳ͔ͬͨʂ $! $@ ͨͿΜʜ $. $/
13. ͜Μ͖ͯ͢ͱʁʁʁ @a = (0, 1, 2) Ϧετ
 ίϯςΩετ 0, 1, 2 εΧϥʔ
 ίϯςΩετ 3 ཁૉ਺͕஌Γ͔ͨͬͨΒ
    len()
    ͱ͔໌ࣔతʹॻ͖͍ͨ ৔ॴʹΑͬͯҙຯ͢Δͱ͜Ζ͕ҧ͏ʜʜͩͱʜʜ
14. NZ
    ࢯ w --ͬͯݴΘΕΔ͘Β͍ͩ͠ɺϥΠτʹॻ͖͍ͨ
    w 1ZUIPOͰ͸म০ࢠͳ͠ͰϩʔΧϧม਺
15. ਅِ஋Σʜʜ w ਅِΛද͢໌֬ͳ΍͕ͭͳ͍
    w 5SVF
    'BMTFཉ͍ͬ͢͠
    w ίϯςΩετ΋૬·ͬͯѻ͍͕೉͍͠
16. ϦϑΝϨϯε w ࠷ॳɺ ͱ<>͸ಉͩ͡ͱࢥ͍ͬͯͨ
    w εΧϥʔม਺ͳͷʹ഑ྻʂ
    w 1ZUIPOͰ͸഑ྻͱݴͬͨΒ͜Ε͚ͩ @a = (0, 1, 2); $ref = \@a; $ref = [0, 1, 2]; a = [0, 1, 2]
17. ͳΜͰҾ਺Ϧετͳ͍ͷ w !@Λड͚ͱΔ͚Ͳ࢖͍ํࣗ༝͗͢
    w 1ZUIPOͩͱؔ਺ͷσϑΥϧτ஋ΛઃఆͰ͖Δ͠
 ΩʔϫʔυͰݺͿ͜ͱ΋ग़དྷΔʂ my ($a, $b) = @_; my $a = shift; my %args = @_;
18. ͪͳΈʹ w σϑΥϧτ஋Λ࢖ͬͨݺͼग़͠
    w ී௨ͷݺͼग़͠
    w Ωʔϫʔυݺͼग़͠ def hello(name = 'mihyaeru'): print 'Hello, %s' % name ! hello() hello('dareka') hello(name = 'anata')
19. ෆຬΛ๊͖ͭͭ
 ਺ϲ݄͕ܦա
20. ࠷ॳʹࢥͬͨෆຬ w มͳه߸ଟͯ͘ҙຯෆ໌
    w ίϯςΩετʁʁʁ
    w ຖճ
    NZ
    ͬͯॻ͘ͷ໘౗͍͘͞
    w ਅِ஋Σʜʜ
    w ϦϑΝϨϯεपΓ͕Θ͔Γʹ͍͘
    w Ҿ਺Ϧετ͸Ͳ͜ʂʁ
21. ࠷ॳʹࢥͬͨෆຬ
    ࠓ͸ w มͳه߸ଟͯ͘ҙຯෆ໌
    w ίϯςΩετʁʁʁ
    w ຖճ
    NZ
    ͬͯॻ͘ͷ໘౗͍͘͞
    w ਅِ஋Σʜʜ
    w ϦϑΝϨϯεपΓ͕Θ͔Γʹ͍͘
    w Ҿ਺Ϧετ͸Ͳ͜ʂʁ ׳ΕΕ͹ා͘ͳ͍ʂ ׳ΕΕ͹ʢ͈́ ॻ͍ͨํ͕҆৺ײ͋Δ ਅِ஋Σʜʜ Ҿ਺ʹ໊લ͸ͳ͘୯ͳΔϦετ ະͩʹͬ͘͠Γ͜ͳ͍
22. ෆຬ͹͔Γݴͬͯ΋
 ΞϨͳͷͰ
23. ؾʹೖ͍ͬͯΔͱ͜Ζ w ແ໊ؔ਺͕࢖͍΍͍͢
    w NBQͱ͔HSFQͷײ͕͡޷͖
    w ϝιουݺͼग़࣌͠ͷୈҰҾ਺ʹTFMG͕ೖͬͯ͘Δ
24. ແ໊ؔ਺͕࢖͍΍͍͢ w 1ZUIPOʹ΋MBNCEBͱ͍͏ແ໊ؔ਺Λ࡞Δه๏ΞϦ
    w ࣜΛ͔ͭ͠ೖΕΒΕͳ͍͔Β਺จͷॲཧ͸μϝ hoge_call(sub { # do # something # hoge }); def temp(): # do # something # hoge ! hoge_call(temp) 1FSM 1ZUIPO
25. NBQͱ͔HSFQ͕ྑ͍ײ͡ Ҿ਺Λح਺͚ͩʹߜΓࠐΜͰɺɺɺ
 ৐ͨ͠஋ͷ഑ྻʹ͢Δɺɺɺ
 తͳॲཧ my @squared_odds = map { $_ * $_ } grep { $_ % 2 == 1 } @_;
26. 1ZUIPOͩͱ [x * x for x in nums if x % 2 == 1]
27. 1ZUIPOͩͱ [x * x for x in nums if x % 2 == 1] NBQʹ૬౰ HSFQʹ૬౰
28. Ϧετ಺แදه [x * x for x in X if x % 2 == 1] {x2 | x ∈ X, x % 2 = 1} ਺ֶͷू߹ʹ͓͚Δ
    ಺แతදه
    ͕ݩʹͳ͍ͬͯΔ
29. ϝιουͷTFMG 1ZUIPOΛኲኵͱͤͯ͞਌ۙײ͋Γ sub method { my ($self, $hoge) = @_; } def method(self, hoge): pass
30. ౜ಥ͚ͩͲ
 ͦΜͳ͜ΜͳͰ
31. ·ͱΊ w 1FSM࢖͍࢝Ίͯ਺ϲ݄ͷਓͷײ૝
    w ֖Λ͚͋ͯΈΔͱṖ͍ͱ͜Ζ͕ଟʑ
    w ͋Δఔ౓͸׳ΕͰͳΜͱ͔ͳΔʂ
    w 1FSMා͔͚ͬͨͲࠓͰ͸޷͖ͳͱ͜Ζ΋͋Δʂʂ