Depuis la version 5.018, Perl affiche des avertissements lorque l'on utilise given/when, tel que :
given is experimental at ...
when is experimental at ...

Pour les supprimer :
no if $] >= 5.018, 'warnings', 'experimental::smartmatch';

via http://domm.plix.at/perl/2013_05_given_smartmatch.html