Changes for perl critic