Fungsi exp() di Perl

Dalam bahasa pemrograman Perl memiliki fungsi built-in exp().

Fungsi log() kembali basis dari logaritma natural untuk daya tertentu:

▶ Run
#!/usr/bin/perl

use feature qw(say);

say exp(0); # 1
say exp(1); # 2.71828182845905
say exp(2); # 7.38905609893065
say exp(3); # 20.0855369231877

Argumen

Jika fungsi log() tidak diberikan tidak ada argumen, fungsi bekerja dengan variabel $_:

Dalam contoh ini, variabel $_ berisi undef, fungsi kerjanya persis sama seperti log(0), kembali 1, tapi masih selain itu, peringatan akan ditampilkan Use of uninitialized value $_ in exp at script.pl line 6. karena fakta bahwa dalam kode ada garis use warnings;:

▶ Run
#!/usr/bin/perl

use strict;
use warnings;

print exp();

Standar menggunakan exp() adalah untuk lulus satu argumen.

Jika fungsi transfer exp() lebih dari satu argumen, itu akan menjadi sebuah kesalahan dan kode eksekusi akan dihentikan.

Too many arguments for exp at script.pl line 3, near "2)"
Execution of script.pl aborted due to compilation errors.

Nilai kembali

Fungsi exp() selalu mengembalikan jumlah.

Dokumentasi resmi

Berikut ini adalah output dari perintah perldoc -f exp:

    exp EXPR
    exp     Returns *e* (the natural logarithm base) to the power of EXPR.
            If EXPR is omitted, gives "exp($_)".

Topik terkait

Artikel lainnya