> > $data =~ s{ (?<! \n ) \n (?! \n ) }{}gmsx;
I have no Idea what that is supposed to do.
the output from that is:
\nSynopsis :\n\nA file / print sharing service is listening on the
remote host.\n\nDescription :\n\nThe remote service understands the
CIFS (Common Internet File System)\nor Server Message Block (SMB)
protocol, used to provide shared access\nto files, printers, etc
between nodes on a network.\n\nSolution :\n\nn/a\n\nRisk factor :\n
\nNone\n\nPlugin output :\n\nA CIFS server is running on this port.\n
\n
no \n have been removed...
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
