In an one-liner (just golf):

@passed_items = map {split /\|/; $_[4] eq $var ? $_[10] : undef} <DATA
+>;
[download]

Jeroen
"We are not alone"(FZ)
Updated x 2 (ouch, that 'n' hurts!)