์ด์ ฏ๋ฐค ํด๋ผ์ฐ๋์์์ Perl ๋ฐ Raku ์ปจํผ๋ฐ์ค์์ ์์ฌX ๋ฐํ Perl์ ๊ธฐ๋ณธ ๋ฒ์ ์ 5์์ 7๋ก ๋ณ๊ฒฝํฉ๋๋ค. ์์ ์ด ์ด๋ฏธ ์งํ ์ค์ด๋ฉฐ ์ ๋ฒ์ ์ 7๋ ์ด๋ด์ ์ถ์๋ ์์ ์ ๋๋ค. ๊ฐ๋จํ ๋งํด์, Perl 5.32์ ์ต์ ๊ธฐ๋ณธ ์ค์ ์ ๊ฐ์ถ Perl XNUMX์ ์ฌ์ ํ ๋์ผํฉ๋๋ค. ์ด๋ฏธ ์ฌ์ฉํ๊ณ ์๋ ๊ธฐ๋ฅ์ ๋ ์ด์ ๋ช ์์ ์ผ๋ก ํ์ฑํํ ํ์๊ฐ ์์ต๋๋ค. ํด๋น ๊ธฐ๋ฅ์ด ์๋์ผ๋ก ํ์ฑํ๋ฉ๋๋ค!
๋ฌด์์ด ํฌํจ๋๋์?
์์ง ์ ์ฒด ๋ชฉ๋ก์ ์์ง๋ง ์๊ฒฉํ๊ณ ๊ฒฝ๊ณ ํฉ๋๋ค! 7๋ฒ์งธ ๋ฆด๋ฆฌ์ค์์๋ ์๋ช
์ด ์คํ์ ์ผ๋ก ์ ์ง๋ ๊ฐ๋ฅ์ฑ์ด ๋์ผ๋ฉฐ utf8๋ ํฌํจ๋ ์๊ฐ์ด ์์ต๋๋ค.
๋ฌด์์ด ๋นํ์ฑํ๋๋์?
- ๊ฐ์ ๋ฉ์๋ ํธ์ถ:
{;
ํจํค์ง ํธ;ํ์ ์๋ก์ด { ์ถ๋ณต {} }
sub bar { print "Hello from bar()!n" x pop }
}# ์ผ๋ฐ ํตํ
๋ด $foo = Foo->new();
# ๊ฐ์ ํธ์ถ
๋ฐ $foo 42; - ์ค๋ช ์ ์๋ณ์๋ก ๋น ๋จ์ด(๋ฒ ์ด์๋)(ํ์ค ์๋ณ์(STDIN, STDOUT, STDERR) ์ ์ธ)
- Perl 4 ์คํ์ผ ์์ฌ ๋ค์ฐจ์ ํด์.
# perldoc perlvar์์ ๊ฐ์ ธ์จ ์
$foo{$x,$y,$z}
# ์ค์ ๋ก๋ $foo{join($;, $x, $y, $z)}๋ฅผ ์๋ฏธํฉ๋๋ค. - Perl 4 ์คํ์ผ์ ์ค๋๋ ํ๋กํ ํ์
์ด์ ๋ค์๊ณผ ๊ฐ์ด ์์ฑํ๋ฉด ๋ฉ๋๋ค:
ํ์ foo :prototype($$) ($left, $right) {
๋ฐํ $left + $right;
}๋จผ์ ํธ์ถ ์ปดํ์ผ์ ์ํฅ์ ๋ฏธ์น๋ ํ๋กํ ํ์ ๊ณผ ๋ฐํ์ ์ ์ ์ ํ ๋ณ์์ ์ธ์๋ฅผ ๋ฐฐ์นํ๋ ์๋ช ์ ๋๋ค.
๊ทธ๋ฌ๋ ๋ชจ๋ ๊ฒ์ ๋๋์ผ๋ก ๋ฐํํ ์ ์๋ ๊ธฐํ๋ ์ฌ์ ํ ์์ต๋๋ค.
compat::perl5๋ฅผ ์ฌ์ฉํ์ญ์์ค.
์๋๋ฉด ํ ๋ฒ์ ํ๋์ฉ.
Perl 5.32๋ 5๋ ๋์ ์ฅ๊ธฐ ์ง์๋ฉ๋๋ค.
Brian D Foy์ ์ถ๊ฐ ๋ฐํ: https://www.perl.com/article/announcing-perl-7/
๊ทธ ์ฌ๋์ TL;DR ๋ฒ์ : http://blogs.perl.org/users/brian_d_foy/2020/06/the-perl-7-tldr.html
์ถ์ฒ : linux.org.ru