Re: comments are important after all

Each comment (init:, restart:, main:, finish:) is converted into the appropriate JAPH word by indexing into $.. The characters of the JAPH word are stored in $\ initially; once a word is complete, it is moved to $/ and inserted into the next &p; subroutine call.

We track the values of $. and $\ below.

# he,qng]dJshQ ruJr Paaktg oetljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # ''
# abcdefghi
# he,qng]dshQ ruJr Paaktg oetljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'J'
# abcdefghijklmn
# he,qng]dshQ rJr Paaktg oetljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'Ju'
# abcdefghi
# he,qng]dhQ rJr Paaktg oetljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'Jus'
# abcdefghijklmnopqrst
# he,qng]dhQ rJr Paakg oetljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'Just'
#                     :;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`
# he,qng]dhQ rJr PaakgoetljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'Just '
# &p('Just ');
# he,qng]dhQ rJr PaakgoetljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # ''
# abcdefghijklmnopqr
# he,qng]dhQ rJr PakgoetljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'a'
# abcde
# he,qg]dhQ rJr PakgoetljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'an'
# abcdefghijklmnopqrs
# he,qg]dhQ rJr PakgetljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'ano'
# abcdefghijklmnopqrst
# he,qg]dhQ rJr PakgeljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'anot'
# a
# e,qg]dhQ rJr PakgeljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'anoth'
# abcdefghijklmnopqr
# e,qg]dhQ rJr PakgljryccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'anothe'
# abcdefghijklmnopqrst
# e,qg]dhQ rJr PakgljyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'another'
#             :;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`
# e,qg]dhQ rJrPakgljyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'another '
# &p('another ');
# e,qg]dhQ rJrPakgljyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # ''
# abcdefghijklm
# e,qg]dhQ rJrakgljyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'P'
# a
# ,qg]dhQ rJrakgljyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'Pe'
# abcdefghi
# ,qg]dhQ JrakgljyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'Per'
# abcdefghijklmn
# ,qg]dhQ JrakgjyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'Perl'
#        :;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`
# ,qg]dhQJrakgjyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'Perl '
# &p('Perl ');
# ,qg]dhQJrakgjyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # ''
# abcdef
# ,qg]dQJrakgjyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'h'
# abcdefghi
# ,qg]dQJrkgjyccwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'ha'
# abcdefghijklmn
# ,qg]dQJrkgjycwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'hac'
# abcdefghi
# ,qg]dQJrgjycwsR_djeYK^Y[Ued]_IW_WPPijsP^i # 'hack'
# abcdefghijklmnopqrs
# ,qg]dQJrgjycwsR_djYK^Y[Ued]_IW_WPPijsP^i # 'hacke'
# abcdefgh
# ,qg]dQJgjycwsR_djYK^Y[Ued]_IW_WPPijsP^i # 'hacker'
# :;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`
# qg]dQJgjycwsR_djYK^Y[Ued]_IW_WPPijsP^i # 'hacker,'
# &p('hacker,');
# qg]dQJgjycwsR_djYK^Y[Ued]_IW_WPPijsP^i # ''
[download]

Comment on Re: comments are important after all Select or Download Code

Replies are listed 'Best First'.
Re^2: comments are important after all by grinder (Bishop) on Jun 08, 2005 at 09:56 UTC
oooh, shiny! how did you do that spoiler node/page trick thing? I recall discussion on the subject, but I don't remember where/when. A quick refresher in the form a link to documentation would be most appreciated! - another intruder with the mooring in the heart of the Perl	[reply]
Re^3: comments are important after all by teamster_jr (Curate) on Jun 08, 2005 at 16:39 UTC
<spoiler> and </spoiler> (in the same manner as readmore) alex	[reply]
Re^3: comments are important after all by kaif (Friar) on Jun 08, 2005 at 17:21 UTC
See the Perl Monks Approved HTML tags. It contains a list of all appropriate HTML tags, along with the Perl Monks pseudo-tags: `<code>`, `<readmore>`, and `<spoiler>`.	[reply] [d/l] [select]