Perl , o Practical Extraction and Report Language, è un linguaggio di scripting del computer ottimizzati per operazioni su grandi quantità di dati a motivi geometrici . Tuttavia, Perl può anche gestire più normali calcoli matematici , come la radice quadrata . Utilizzando pacchetti esterni , la funzione radice quadrata Perl in grado di 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 . Il Perl sqrt ( ) funzione prende la radice quadrata di un numero dato come argomento . Se l'argomento non è incluso , il sqrt ( ) funzione opera con la variabile $ _

$ risultato = sqrt ( $ un_numero ) . Print $ risultato ;
numeri complessi

Per impostazione predefinita , prendendo una radice quadrata di un numero negativo, verrà restituito un errore in Perl . Tuttavia, se è stato incluso il "Math :: Complex " pacchetto , tutte le operazioni matematiche possono essere eseguite su numeri complessi . I pacchetti sono inseriti nei file Perl utilizzando il comando uso

uso Math :: Complex , . $ My_root = sqrt ( -144 ) ; # ritorna 12iprint $ my_root ;
altri Roots

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

$ radice_cubica = $ my_num ** ( 1/3) ; . Print $ radice_cubica ;
Campione programma

Per eseguire completamente un programma di esempio in Perl per la radice quadrata o altro , 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 ' . % 1 % radice d di% 2 % d è % 3 % f \\ n' , $ my_root , $ my_num , ( $ my_num ** ( 1 /$ my_root ) ) ;