"Though since I don't actually have a perl 5.004 to test on, I do wonder if it works..."

The only thing that I can see which won't work is 'use warnings;':

$ corelist warnings

Data for 2022-05-27
warnings was first released with perl v5.6.0
[download]

Replace with '$^W = 1;'.