Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

RE: Perl/Tk Chatterbox Client

by ZZamboni (Curate)
on Jul 13, 2000 at 01:43 UTC ( #22284=note: print w/ replies, xml ) Need Help??


in reply to Perl/Tk Chatterbox Client

If you cut-and-paste from this page, you can use the following to remove the continuation "+" signs and reconstruct the file correctly:

perl -ne 'chomp; if (/^\+(.*)$/) { $last.=$1 } \ else { print "$last\n"; $last=$_ } \ END { print "$last\n" }' origfile.pl > destfile.pl

--ZZamboni


Comment on RE: Perl/Tk Chatterbox Client
Download Code
RE: RE: Perl/Tk Chatterbox Client
by tye (Cardinal) on Jul 25, 2000 at 20:32 UTC

    This is easier to type:

    perl -pe 'chomp;s/^\+//||s/^/\n/;END{print"\n"}' # Unix perl -pe "chomp;s/^\+//||s/^/\n/;END{print qq.\n.}" # Win32

    And you can drop the END{...} part if you just append an extra blank line to the input or don't mind the missing final newline on the output.

Re: RE: Perl/Tk Chatterbox Client
by Chady (Priest) on Jan 22, 2001 at 01:42 UTC
    isn't it easier to click on the "d/l code" to download the code????
    Chady | http://chady.net/
      Those comments were written waaaaaay before the "d/l code" feature existed... :-)

      --ZZamboni, aka Duke Dong

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://22284]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (5)
As of 2014-09-20 22:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (163 votes), past polls