initial commit of file from CVS for e-smith-hosts on Wed 12 Jul 08:56:08 BST 2023

This commit is contained in:
Brian Read
2023-07-12 08:56:08 +01:00
parent 58e6e39b6f
commit b45f3382c7
23 changed files with 3378 additions and 2 deletions

View File

@@ -0,0 +1,10 @@
{
# Purge quoting chars in comments to fix bug 8723 & bug 8806
foreach my $host ($DB->get_all)
{
my $comment = $host->prop('Comment');
next unless $comment;
$comment =~ s/[^a-zA-Z0-9\ \_\-\,\.]+//g;
$host->merge_props(Comment => $comment);
}
}