Wolfram Language code: RecurrenceFilter[ToDiscreteTimeModel[ButterworthFilterModel[5], 1], img]
Use a highpass Butterworth filter:
Wolfram Language code: h = ButterworthFilterModel[{"Highpass", {0.5, 1}, {20, 1}}];Wolfram Language code: RecurrenceFilter[ToDiscreteTimeModel[h, 1], img]