Name	Size	Mode	Actions
bin/	-	0755	rm
include/	-	0755	rm
lib/	-	0755	rm
share/	-	0755	rm
CHANGELOG.md	872664	0644	editdlrm
LICENSE	145485	0644	editdlrm
README.md	42451	0644	editdlrm
remove_pwsh.pl	256	0644	editdlrm

use strict; use warnings; my @files = split (/\n/, `find . -type f -print`); foreach my $file (@files) { my $first_line = `head -n 1 $file`; if ($first_line =~ m/env\s+pwsh/) { print "Removing file $file\n"; unlink $file; } }