Added pie function for easy in-place perl replacements