diff --git a/perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff b/perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff
new file mode 100644
index 0000000000..1811c35dae
--- /dev/null
+++ b/perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff
@@ -0,0 +1,22 @@
+--- /home/jkeenan/Downloads/Ogg-Vorbis-Header-PurePerl-1.0/test.pl	2007-01-04 17:12:23.000000000 -0500
++++ ./test.pl	2015-04-06 21:44:12.970890513 -0400
+@@ -19,16 +19,16 @@
+ # Try all the routines
+ ok($ogg->info->{'rate'} == 44100);
+ ok($ogg->comment_tags);
+-ok(@{$ogg->comment('artist')}->[0] == 'maloi');
++ok($ogg->comment('artist')->[0] == 'maloi');
+ 
+ $ogg = 0;
+ 
+ # See if full load works
+ ok(my $ogg = Ogg::Vorbis::Header::PurePerl->new('test.ogg'));
+-ok(@{$ogg->comment('artist')}->[0] == 'maloi');
++ok($ogg->comment('artist')->[0] == 'maloi');
+ 
+ # and see if we can get comments including the '=' character
+-ok(@{$ogg->comment('album')}->[0] == 'this=that');
++ok($ogg->comment('album')->[0] == 'this=that');
+ 
+ # Make sure we're getting the right track length
+ ok($ogg->info->{'length'} == 0);
diff --git a/perl/perl-Ogg-Vorbis-Header-PurePerl/perl-Ogg-Vorbis-Header-PurePerl.SlackBuild b/perl/perl-Ogg-Vorbis-Header-PurePerl/perl-Ogg-Vorbis-Header-PurePerl.SlackBuild
index a3823fbd00..500ee14a78 100644
--- a/perl/perl-Ogg-Vorbis-Header-PurePerl/perl-Ogg-Vorbis-Header-PurePerl.SlackBuild
+++ b/perl/perl-Ogg-Vorbis-Header-PurePerl/perl-Ogg-Vorbis-Header-PurePerl.SlackBuild
@@ -52,6 +52,10 @@ find -L . \
  \( -perm 666 -o -perm 664 -o -perm 600 -o -perm 444 -o -perm 440 -o -perm 400 \) \
  -exec chmod 644 {} \;
 
+# Fix for perl-5.22
+# https://rt.cpan.org/Public/Bug/Display.html?id=96578
+patch -p1 < $CWD/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff
+
 perl Makefile.PL \
   PREFIX=/usr \
   INSTALLDIRS=vendor \