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" ;