Use open to open a file handle then use:

while (<IN>) {
[download]

to scan the file. Use index or a regular expression match to skip (using next) until the interface line is found. Skip until the description line is found:

/^description/ && last while <IN>;

my $description = $_;
[download]

Process the description then use the same technique for the rest of the lines you need to match.