diff options
author | KuhnChris <kuhnchris@kuhnchris.eu> | 2023-06-28 16:07:28 +0200 |
---|---|---|
committer | Stefano Brivio <sbrivio@redhat.com> | 2023-07-07 22:34:37 +0200 |
commit | cc2a6bec3cf2ff6ed0c043ada93d352466614373 (patch) | |
tree | 65c488a9dec778dd218fd88c38362603cac09908 /makedocs.pl | |
parent | e01759e2fab0f66fa5876794425d3ec8489562a9 (diff) | |
download | passt-cc2a6bec3cf2ff6ed0c043ada93d352466614373.tar passt-cc2a6bec3cf2ff6ed0c043ada93d352466614373.tar.gz passt-cc2a6bec3cf2ff6ed0c043ada93d352466614373.tar.bz2 passt-cc2a6bec3cf2ff6ed0c043ada93d352466614373.tar.lz passt-cc2a6bec3cf2ff6ed0c043ada93d352466614373.tar.xz passt-cc2a6bec3cf2ff6ed0c043ada93d352466614373.tar.zst passt-cc2a6bec3cf2ff6ed0c043ada93d352466614373.zip |
MAKE: Fix parallel builds; .o files; .gitignore; new makedocs
Diffstat (limited to 'makedocs.pl')
-rw-r--r-- | makedocs.pl | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/makedocs.pl b/makedocs.pl new file mode 100644 index 0000000..295e1d9 --- /dev/null +++ b/makedocs.pl @@ -0,0 +1,19 @@ +use strict; + +my $str = ''; +my $regex = qr/(<[^\/].*?>.*?<\/.*?>\n?)|(<\/div>)|(<\/p>)/msp; +my $subst = ''; + + +local $/=undef; +open FILE, '<', 'README.md' or die "Can't open file $!"; +my $file_content = <FILE>; +close FILE; +#print "Source: $file_content\n"; +my $result = $file_content =~ s/$regex//rg; + +my $regex2 = qr/\n[ \n]{3,}\n/msp; +$result = $result =~ s/$regex2/\n\n/rg; + +#print "The result of the substitution is: $result\n"; +print "$result\n"; |