Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Definovať parametre príkazového riadku , ktorý chcete použiť . Napríklad , môžete použiť parameter časové určiť dobu trvania povodne . Ak je parameter vynechaný , povodeň by mohla byť kontinuálne . Použitie skriptu Perl napríklad na príkazovom riadku môže byť takto : 
 
 flood.pl - port port - veľkosť bytov - doba sekúnd - šírka pásma kbps - oneskorenie ms 
 
 2 
 Zahrnúť " Socket " , " getopt :: Long " a " Time :: HiRes " Perl moduly vo vašom skripte . Modul " Socket " načíta C socket.h definuje a štruktúra manipulátorov . Modul " getopt :: Long " realizuje GetOptions funkcie ( ) . Funkcia prečíta program príkazového riadku , hľadá zodpovedajúce argumenty , a ak je nájdený , nastaví zodpovedajúci možnosť premennú na true . " Time :: HiRes " modul poskytuje čas s vysokým rozlíšením a časovača , ako napríklad " gettimeofday " systémového volania . Napríklad : 
 
 použiť getopt :: Long , 
 
 použiť Zásuvka ; 
 
 použiť Čas :: HiRes ; 
 3 
 vyhlásiť , premenné . Napríklad : 
 
 $ port = 0 ; 
 
 náš $ size = 0 ; 
 
 náš $ time = 0 ; 
 
 náš $ bw = 0 ; 
 
 náš $ delay = 0 ; 
 4 
 Definujte typ pre vaše deklarované premenné . Napríklad : 
 
 GetOptions ( 
 
" port = i " = > \\ $ port # UDP port použiť klipart
 " size = i " = > \\ $ veľkosť , veľkosť # paketu 
 
" šírka pásma = i " = > \\ $ telesnej hmotnosti , # ako moc šírku pásma konzumovať klipart
 " čas = i " = > \\ $ dobe , # beží čas 
 
 " delay = f " = > \\ $ oneskorenie , # inter - packet delay 
 5 
 Kód príkazového riadku východiskové parametre a použitie . Napríklad, môžete nastaviť veľkosť paketu 256 bytov v prípade , že parameter " šírka pásma " je používaný bez parametra " veľkosť " : ! 
 
 $ size = 256 , ak $ bw && $ veľkosť , 
 6 
 Zahrnúť tlač na obrazovka , čo skript robí napríklad : . 
 
 print " Záplavy $ IP " ( $ portu $ port : ? " náhodne " ) . " . port s " 
 
 ( $ veľkostí . ? .. ? " $ size -byte " : " náhodný size" ) , " pakety " ( $ time " za $ time sekúnd " : " " . ) " \\ n" ;