my @logs = `svn log $url -r $oldRev:$currRev`; my @tickets; foreach $log(@logs) { chomp $log; print "$log\n"; $log =~ /([A-Z]+-\d+)/; push(@tickets, $1); } my %hash = map{$_, 1} @tickets; my @master_tickets = keys %hash; my @sorted = sort @master_tickets; foreach $ticket(@sorted) { print ("$ticket\n"); }