Finde alle filer rekursivt som matcher *.jpg

["Lars H." <sslug@sslug>]

Hvordan laves en liste over alle *.jpg filer rekursivt. Svaret skal bruges 
som en liste, @files.

Følgende er IKKE måden at gøre det på da det giver en scalar med det hele.
 
 
$files = system("find /mnt/flash -name \"*.jpg\" ");
print "$files";