For å utvide min grep emulator i Perl har jeg lagt til støtte for en -rbryter som gjør at rekursiv søke i underkataloger. Nå kommandolinjen påkallelse ser omtrent slik ut:
perl pgrep.pl -r <directory> <expression>
Både -rog directoryargumentene er valgfritt (katalog som standard ''). Per nå har jeg bare sjekke om det første argumentet er -r, og hvis ja angi riktig flagg, og skanne i resten to argumenter ved hjelp av shift. Dette åpenbart ville være et problem hvis -rskulle vises på slutten av argumentlisten eller enda verre - i mellom katalognavn og søkeuttrykket.
En løsning ville være å bare slette -relementet fra @ARGV utvalg, slik at jeg kan bare skifte -i de resterende argumenter, men jeg kan ikke finne ut en måte å gjøre det uten å få en 'udef' i en merkelig posisjon i min array. Noen forslag eller ulike strategier som du kanskje har brukt er velkomne.
