#!/usr/bin/perl -ni

s/new\(".+?"\)/new/ixg;
print;
