Select Code to Download

Array found where operator expected at ./orph.pl line 20, near "} "
    (Missing operator before  ?)
Not enough arguments for grep at ./orph.pl line 20, near "grep |"
syntax error at ./orph.pl line 20, near "$eval{"
Execution of ./orph.pl aborted due to compilation errors.

#! /usr/bin/perl
...
@uniqueElements = grep |e $eval{lc $_} @uid2;
print "not in either locations:@uniqueElements\n";
exit;