«

Problem with making Replacement CHR(4) in something.
CHR(9) is "\t"
I use tr///.
What is abbreviation for CHR(4)

Thanks

Max

max wrote:
> Problem with making Replacement CHR(4) in something.
> CHR(9) is "\t"
> I use tr///.
> What is abbreviation for CHR(4)

"\t" could also be represented as "\011" or "\x09" or "\cI" so chr( 4 ) could
be represented as "\04" or "\x04" or "\cD".



John
--
Perl isn't a toolbox, but a small machine shop where you can special-order
certain sorts of tools at low cost and in short order. -- Larry Wall

max <> wrote:

> CHR(9) is "\t"


No it isn't, CHR(9) is an error.

perl -e 'CHR(9)'
Undefined subroutine &main::CHR called at -e line 1.

Case matters.


--
Tad McClellan SGML consulting
Perl programming
Fort Worth, Texas

Thanks
Super is easier that I think.

Max

"John W. Krahn" <> wrote in message
news:JNFHh.35312$cE3.33296@edtnps89...
> max wrote:
> > Problem with making Replacement CHR(4) in something.
> > CHR(9) is "\t"
> > I use tr///.
> > What is abbreviation for CHR(4)
>
> "\t" could also be represented as "\011" or "\x09" or "\cI" so chr( 4 )
could
> be represented as "\04" or "\x04" or "\cD".
>
>
>
> John
> --
> Perl isn't a toolbox, but a small machine shop where you can special-order
> certain sorts of tools at low cost and in short order. -- Larry Wall

"max" <> wrote:
> Problem with making Replacement CHR(4) in something.
> CHR(9) is "\t"
> I use tr///.
> What is abbreviation for CHR(4)


$ perl -le 'use Data:umper; $Data:umper::Useqq=1; \
print Dumper [chr(4), chr(9)];'
$VAR1 = [
"\4",
"\t"
];


It looks like "\4" is a good abbreviation, but I imagine it wouldn't
work if followed by a digit (in which case Dumper uses "\004" instead).



Xho

--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB

Quoth :
> "max" <> wrote:
> > Problem with making Replacement CHR(4) in something.
> > CHR(9) is "\t"
> > I use tr///.
> > What is abbreviation for CHR(4)
>
>
> $ perl -le 'use Data:umper; $Data:umper::Useqq=1; \
> print Dumper [chr(4), chr(9)];'
> $VAR1 = [
> "\4",
> "\t"
> ];
>
>
> It looks like "\4" is a good abbreviation, but I imagine it wouldn't
> work if followed by a digit (in which case Dumper uses "\004" instead).

"\4" is unreliable under some circumstances: notably, in a pattern (or
the RHS of s///), if $4 exists then \4 is assumed to refer to that
rather than chr(4). "\04" is safer.

Ben

--
"Faith has you at a disadvantage, Buffy."
"'Cause I'm not crazy, or 'cause I don't kill people?"
"Both, actually."
[]

Ben Morrow <> wrote:
> Quoth :
> > "max" <> wrote:
> > > Problem with making Replacement CHR(4) in something.
> > > CHR(9) is "\t"
> > > I use tr///.
> > > What is abbreviation for CHR(4)
> >
> >
> > $ perl -le 'use Data:umper; $Data:umper::Useqq=1; \
> > print Dumper [chr(4), chr(9)];'
> > $VAR1 = [
> > "\4",
> > "\t"
> > ];
> >
> >
> > It looks like "\4" is a good abbreviation, but I imagine it wouldn't
> > work if followed by a digit (in which case Dumper uses "\004" instead).
>
> "\4" is unreliable under some circumstances: notably, in a pattern (or
> the RHS of s///), if $4 exists then \4 is assumed to refer to that
> rather than chr(4). "\04" is safer.

Good point. But I think \004 would be better, as it should be safe from
both $4 and from being followed by another digit.


How about Deparse's preferred version?

$ perl -MO=Deparse,-p -e 'print chr(4)'
print("\cD");

Are there hidden problems with that?

Xho

--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB