in reply to SQl logic inPerl

How about something along the lines of:
select name from mytable where acc = '12345' and year = (select max(year) from mytable where year in( $year, $year+1 +))
The syntax is probably dependent on your database, though.