All the Perl that's Practical to Extract and Report
A one-liner which fixes wrong svn properties perl t/distro/file_metadata.t 2| \ perl -ne'system (substr($_,3)) if /^#\s+svn ps /'
perl t/distro/file_metadata.t 2| \ perl -ne'system (substr($_,3)) if /^#\s+svn ps /'