Jonathan Harris has just released a new version of MP4::Info adding support for Sony PSP title and encoder.

Movie title and the encoder used are now accessible under $tag->{NAM} and $tag->{TOO}

1
2
3
4
5

use MP4::Info;
my $file = 'MAQ12331.MP4';

my $tag = get_mp4tag($file) or die "No TAG info";
printf "$file title:%s encoder: %s\n", $tag->{NAM}, $tag->{TOO};

see my related post