:bike: perl5 bob - replaced the overkill general ends_with function with a simple specific regex