Select Code to Download

Hi , I have a file which have input as like below 

...
pet="cow"|hate="rat"|like="dog" 

Any first instance where I find unique value for pet and hate I wanted
+ to print. Thanks

#! /usr/bin/env perl

...
       $_->{hate},
       $_->{like});
}