Perl, o Practical Extraction and Report Language, è un linguaggio di scripting di computer ottimizzati per operazioni su grandi quantità di dati a motivi geometrici. Tuttavia, Perl può anche gestire la maggior parte delle normali calcoli matematici, come la radice quadrata. Utilizzando pacchetti esterni, la funzione radice quadrata Perl può operare su qualsiasi formato di dati numerici disponibili in Perl.

Radice quadrata

Il pacchetto base di Perl contiene diverse funzioni matematiche di base, tra cui radice quadrata. La funzione Perl sqrt () prende la radice quadrata di un numero dato come argomento. Se l'argomento non è incluso, la funzione sqrt () opera sulla variabile $ _.

$ Risultato = sqrt ($ un_numero);
print $ risultato;

Numeri complessi

Per impostazione predefinita, prendendo una radice quadrata di un numero negativo restituirà un errore in Perl. Tuttavia, se è stato inserito il "Math :: Complex" pacchetto, tutte le operazioni matematiche possono essere eseguite su numeri complessi. I pacchetti sono inclusi nel file Perl utilizzando il comando utilizzo.

utilizzare Math :: Complex;
$ My_root = sqrt (-144); #returns 12i
print $ my_root;

altri Roots

Una radice è equivalente a un numero elevato a un esponente frazionario. Per prendere una radice diversa da una radice quadrata in Perl, utilizzare l'operatore esponenziale "**" con un esponente di frazionata. Ad esempio, per ottenere la radice cubica di un numero, utilizzare il codice seguente.

$ Cube_root = $ my_num ** (1/3);
print $ cube_root;

Esempio di programma

Per eseguire completamente un programma di esempio in Perl per prendere il quadrato o altra radice, eseguire il seguente programma.

! / Usr / bin / local / perl

$ My_num = 64;
$ My_root = 3;

printf 'La radice quadrata di 1%% d è% 2% f \ n.', $ my_num, sqrt ($ my_num);
printf 'L'% 1% d radice% 2% d è% 3% f \ n.', $ my_root, $ my_num, ($ my_num ** (1 / $ my_root));