Select Code to Download

#!/usr/bin/perl
use warnings;
...
john 78
erik 9
erik 12

    push @keep, $_ unless $seen{$name}++;

    print unless $seen{$name}++;