Saya terus melihat kata kunci "saya" di depan nama variabel dalam contoh skrip Perl online tetapi saya tidak tahu apa artinya. Saya mencoba membaca halaman manual dan situs lain secara online tetapi saya mengalami kesulitan untuk membedakan untuk apa mengingat perbedaan antara cara saya...
Apa perbedaan antara file .pm(Perl module) dan .pl(Perl script)? Tolong beritahu saya juga mengapa kami kembali 1dari file. Jika mengembalikan 2 atau yang lainnya, itu tidak menghasilkan kesalahan apa pun, jadi mengapa kita kembali 1dari modul Perl?
Saya memiliki serangkaian daftar angka, misalnya: [0] (0.01, 0.01, 0.02, 0.04, 0.03) [1] (0.00, 0.02, 0.02, 0.03, 0.02) [2] (0.01, 0.02, 0.02, 0.03, 0.02) ... [n] (0.01, 0.00, 0.01, 0.05, 0.03) Yang ingin saya lakukan adalah menghitung mean dan deviasi standar secara efisien pada setiap...
Saya memiliki string yang memegang nilai desimal di dalamnya dan saya perlu mengubah string itu menjadi variabel floating point. Jadi contoh string yang saya miliki adalah "5.45" dan saya ingin floating point yang setara sehingga saya dapat menambahkan .1 ke dalamnya. Saya telah mencari di...
Jika saya menjalankan program Perl berikut: perl -e 'use utf8; print "鸡\n";' Saya mendapatkan peringatan ini: Wide character in print at -e line 1. Jika saya menjalankan program Perl ini: perl -e 'print "鸡\n";' Saya tidak mendapat peringatan. Saya pikir use utf8saya harus menggunakan...
Sebagian besar jawaban Stackoverflow yang saya temukan berkenaan dengan proses pembuatan Perl dan pengujian unit dan cakupan kode cukup arahkan saya ke CPAN untuk dokumentasi di sana. Sama sekali tidak ada yang salah dengan menunjuk ke modul CPAN karena di sanalah dokumentasi lengkap seharusnya...
Mari kita ambil sesuatu yang sangat sederhana, # Foo.pm package Foo { my $baz = bar(); sub bar { 42 }; ## Overwrite this print $baz; ## Before this is executed } Apakah ada yang saya dapat dari test.plmenjalankan kode yang mengubah apa $bazyang diatur dan menyebabkan Foo.pmuntuk mencetak...
Melihat Type::Tiny, saya melihat bahwa nama kelas dalam panggilan ke Type::Tiny->newdikutip dalam dokumen resmi, my $NUM = "Type::Tiny"->new( name => "Number", constraint => sub { looks_like_number($_) }, message => sub { "$_ ain't a number" }, ); Kenapa ini? Apakah ini sekadar...
$ perl -pe 1 foo && echo ok Can't open foo: No such file or directory. ok Saya benar-benar ingin skrip perl gagal saat file tidak ada. Apa cara "tepat" untuk membuat -p atau -n gagal ketika file input tidak
Saya ingin sekali belajar Raku (Perl 6) dan sintaksisnya. Saya sudah menginstal Perl 5 di mesin Ubuntu saya. vinod@ubuntu-s-1vcpu-1gb-nyc1-01:~$ perl -v This is perl 5, version 26, subversion 1 (v5.26.1) built for x86_64-linux-gnu-thread-multi (with 67 registered patches, see perl -V for more...
Saya menjalankan string pengembalian 5 karakter berikut yang diharapkan: while (glob '{a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z}'x5) { print "$_\n"; } tetapi hanya mengembalikan 4 karakter: anbc anbd anbe anbf anbg ... Namun, ketika saya mengurangi jumlah karakter dalam...
Dalam perl 5, Anda dapat meniru wc -lmenggunakan oneliner: perl -lnE 'END {say $.}' test.txt Bagaimana menerapkan fungsi ini di Raku Jika Anda mencoba menerapkan ini: raku -e 'say "test.txt".IO.open.lines.elems' ternyata lambat dan menggunakan banyak memori Informasi untuk direproduksi: $...