Quiet 5.18 experimental smartmatch warnings in modern_perl test.

given/when uses smartmatch, so it gets the warning.