| 2015-07-14 13:12:37 |
psl |
bug |
|
|
added bug |
| 2015-07-14 13:14:39 |
psl |
attachment added |
|
demo.awk https://bugs.launchpad.net/ubuntu/+source/perl/+bug/1474366/+attachment/4428749/+files/demo.awk |
|
| 2015-07-14 13:15:12 |
psl |
attachment added |
|
demo_a2p.pl https://bugs.launchpad.net/ubuntu/+source/perl/+bug/1474366/+attachment/4428750/+files/demo_a2p.pl |
|
| 2015-07-14 13:15:28 |
psl |
attachment added |
|
demo1.awk https://bugs.launchpad.net/ubuntu/+source/perl/+bug/1474366/+attachment/4428751/+files/demo1.awk |
|
| 2015-07-14 13:15:41 |
psl |
attachment added |
|
demo1_a2p.pl https://bugs.launchpad.net/ubuntu/+source/perl/+bug/1474366/+attachment/4428752/+files/demo1_a2p.pl |
|
| 2015-07-14 13:16:22 |
psl |
description |
Ubuntu 14.04.2 LTS, amd64
Package perl 5.18.2-2ubuntu1 amd64
I tried to use a2p translator to convert simple AWK script to PERL script. I see that output is strange, characters are missing or are duplicated, I guess it could be related to 64-bit architecture.
Example of a2p output, fragment:
lne: while (<>) {
chomp; ## strip record sepparator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
Notice, label lne is there, not line, notice split command, notice comment "sepparator". This is just an example, a2p creates many similar errors like this, other example:
# crreate translation table
for ($i = 32; $i < 28; $i++) {
rintfprintf('%02x', $i)} = sprintf('%c', $i);
}
is is heads header, print it
lie: while (<>>) {
chomp; # stip record separator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
if 0-9]0-9]/) {
My LOCALE:
$ locale
LANG=en_US.UTF-8
LANGUAGE=
LC_CTYPE="en_US.UTF-8"
LC_NUMERIC=en_US.UTF-8
LC_TIME=en_US.UTF-8
LC_COLLATE="en_US.UTF-8"
LC_MONETARY=en_US.UTF-8
LC_MESSAGES="en_US.UTF-8"
LC_PAPER=en_US.UTF-8
LC_NAME=en_US.UTF-8
LC_ADDRESS=en_US.UTF-8
LC_TELEPHONE=en_US.UTF-8
LC_MEASUREMENT=en_US.UTF-8
LC_IDENTIFICATION=en_US.UTF-8
LC_ALL=
I will attach two AWK scripts and two PERL scripts created with a2p, like this: a2p demo.awk > demo_a2p.pl |
Ubuntu 14.04.2 LTS, amd64
Package perl 5.18.2-2ubuntu1 amd64
I tried to use a2p translator to convert simple AWK script to PERL script. I see that output is strange, characters are missing or are duplicated, I guess it could be related to 64-bit architecture.
Example of a2p output, fragment:
lne: while (<>) {
chomp; ## strip record sepparator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
Notice, label lne is there, not line, notice comment "sepparator". This is just an example, a2p creates many similar errors like this, other example:
# crreate translation table
for ($i = 32; $i < 28; $i++) {
rintfprintf('%02x', $i)} = sprintf('%c', $i);
}
is is heads header, print it
lie: while (<>>) {
chomp; # stip record separator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
if 0-9]0-9]/) {
My LOCALE:
$ locale
LANG=en_US.UTF-8
LANGUAGE=
LC_CTYPE="en_US.UTF-8"
LC_NUMERIC=en_US.UTF-8
LC_TIME=en_US.UTF-8
LC_COLLATE="en_US.UTF-8"
LC_MONETARY=en_US.UTF-8
LC_MESSAGES="en_US.UTF-8"
LC_PAPER=en_US.UTF-8
LC_NAME=en_US.UTF-8
LC_ADDRESS=en_US.UTF-8
LC_TELEPHONE=en_US.UTF-8
LC_MEASUREMENT=en_US.UTF-8
LC_IDENTIFICATION=en_US.UTF-8
LC_ALL=
I will attach two AWK scripts and two PERL scripts created with a2p, like this: a2p demo.awk > demo_a2p.pl |
|
| 2015-07-15 12:24:39 |
psl |
description |
Ubuntu 14.04.2 LTS, amd64
Package perl 5.18.2-2ubuntu1 amd64
I tried to use a2p translator to convert simple AWK script to PERL script. I see that output is strange, characters are missing or are duplicated, I guess it could be related to 64-bit architecture.
Example of a2p output, fragment:
lne: while (<>) {
chomp; ## strip record sepparator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
Notice, label lne is there, not line, notice comment "sepparator". This is just an example, a2p creates many similar errors like this, other example:
# crreate translation table
for ($i = 32; $i < 28; $i++) {
rintfprintf('%02x', $i)} = sprintf('%c', $i);
}
is is heads header, print it
lie: while (<>>) {
chomp; # stip record separator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
if 0-9]0-9]/) {
My LOCALE:
$ locale
LANG=en_US.UTF-8
LANGUAGE=
LC_CTYPE="en_US.UTF-8"
LC_NUMERIC=en_US.UTF-8
LC_TIME=en_US.UTF-8
LC_COLLATE="en_US.UTF-8"
LC_MONETARY=en_US.UTF-8
LC_MESSAGES="en_US.UTF-8"
LC_PAPER=en_US.UTF-8
LC_NAME=en_US.UTF-8
LC_ADDRESS=en_US.UTF-8
LC_TELEPHONE=en_US.UTF-8
LC_MEASUREMENT=en_US.UTF-8
LC_IDENTIFICATION=en_US.UTF-8
LC_ALL=
I will attach two AWK scripts and two PERL scripts created with a2p, like this: a2p demo.awk > demo_a2p.pl |
Ubuntu 14.04.2 LTS, amd64
Package perl 5.18.2-2ubuntu1 amd64
I tried to use a2p translator to convert simple AWK script to PERL script. I see that output is strange, characters are missing or are duplicated, I guess it could be related to 64-bit architecture.
Example of a2p output, fragment:
lne: while (<>) {
chomp; ## strip record sepparator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
Notice, label lne is there, not line, notice comment "sepparator". This is just an example, a2p creates many similar errors. Other example:
# crreate translation table
for ($i = 32; $i < 28; $i++) {
rintfprintf('%02x', $i)} = sprintf('%c', $i);
}
is is heads header, print it
lie: while (<>>) {
chomp; # stip record separator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
if 0-9]0-9]/) {
Notice, label "lie" is there, not "line", notice comment "crreate", notice that condition in for loop is $i<28 but should be $i<128, notice AWK line
XT[sprintf("%02x", i)]=sprintf("%c", i);
was translated to
rintfprintf('%02x', $i)} = sprintf('%c', $i);
and notice the last line with "if".
My LOCALE:
$ locale
LANG=en_US.UTF-8
LANGUAGE=
LC_CTYPE="en_US.UTF-8"
LC_NUMERIC=en_US.UTF-8
LC_TIME=en_US.UTF-8
LC_COLLATE="en_US.UTF-8"
LC_MONETARY=en_US.UTF-8
LC_MESSAGES="en_US.UTF-8"
LC_PAPER=en_US.UTF-8
LC_NAME=en_US.UTF-8
LC_ADDRESS=en_US.UTF-8
LC_TELEPHONE=en_US.UTF-8
LC_MEASUREMENT=en_US.UTF-8
LC_IDENTIFICATION=en_US.UTF-8
LC_ALL=
I will attach two AWK scripts and two PERL scripts created with a2p, like this: a2p demo.awk > demo_a2p.pl |
|
| 2015-07-16 08:00:03 |
psl |
summary |
a2p at amd64 has buggy output |
a2p has buggy output |
|
| 2015-07-16 08:00:29 |
psl |
description |
Ubuntu 14.04.2 LTS, amd64
Package perl 5.18.2-2ubuntu1 amd64
I tried to use a2p translator to convert simple AWK script to PERL script. I see that output is strange, characters are missing or are duplicated, I guess it could be related to 64-bit architecture.
Example of a2p output, fragment:
lne: while (<>) {
chomp; ## strip record sepparator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
Notice, label lne is there, not line, notice comment "sepparator". This is just an example, a2p creates many similar errors. Other example:
# crreate translation table
for ($i = 32; $i < 28; $i++) {
rintfprintf('%02x', $i)} = sprintf('%c', $i);
}
is is heads header, print it
lie: while (<>>) {
chomp; # stip record separator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
if 0-9]0-9]/) {
Notice, label "lie" is there, not "line", notice comment "crreate", notice that condition in for loop is $i<28 but should be $i<128, notice AWK line
XT[sprintf("%02x", i)]=sprintf("%c", i);
was translated to
rintfprintf('%02x', $i)} = sprintf('%c', $i);
and notice the last line with "if".
My LOCALE:
$ locale
LANG=en_US.UTF-8
LANGUAGE=
LC_CTYPE="en_US.UTF-8"
LC_NUMERIC=en_US.UTF-8
LC_TIME=en_US.UTF-8
LC_COLLATE="en_US.UTF-8"
LC_MONETARY=en_US.UTF-8
LC_MESSAGES="en_US.UTF-8"
LC_PAPER=en_US.UTF-8
LC_NAME=en_US.UTF-8
LC_ADDRESS=en_US.UTF-8
LC_TELEPHONE=en_US.UTF-8
LC_MEASUREMENT=en_US.UTF-8
LC_IDENTIFICATION=en_US.UTF-8
LC_ALL=
I will attach two AWK scripts and two PERL scripts created with a2p, like this: a2p demo.awk > demo_a2p.pl |
Ubuntu 14.04.2 LTS, amd64
Package perl 5.18.2-2ubuntu1 amd64
I tried to use a2p translator to convert simple AWK script to PERL script. I see that output is strange, characters are missing or are duplicated.
Example of a2p output, fragment:
lne: while (<>) {
chomp; ## strip record sepparator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
Notice, label lne is there, not line, notice comment "sepparator". This is just an example, a2p creates many similar errors. Other example:
# crreate translation table
for ($i = 32; $i < 28; $i++) {
rintfprintf('%02x', $i)} = sprintf('%c', $i);
}
is is heads header, print it
lie: while (<>>) {
chomp; # stip record separator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
if 0-9]0-9]/) {
Notice, label "lie" is there, not "line", notice comment "crreate", notice that condition in for loop is $i<28 but should be $i<128, notice AWK line
XT[sprintf("%02x", i)]=sprintf("%c", i);
was translated to
rintfprintf('%02x', $i)} = sprintf('%c', $i);
and notice the last line with "if".
My LOCALE:
$ locale
LANG=en_US.UTF-8
LANGUAGE=
LC_CTYPE="en_US.UTF-8"
LC_NUMERIC=en_US.UTF-8
LC_TIME=en_US.UTF-8
LC_COLLATE="en_US.UTF-8"
LC_MONETARY=en_US.UTF-8
LC_MESSAGES="en_US.UTF-8"
LC_PAPER=en_US.UTF-8
LC_NAME=en_US.UTF-8
LC_ADDRESS=en_US.UTF-8
LC_TELEPHONE=en_US.UTF-8
LC_MEASUREMENT=en_US.UTF-8
LC_IDENTIFICATION=en_US.UTF-8
LC_ALL=
I will attach two AWK scripts and two PERL scripts created with a2p, like this: a2p demo.awk > demo_a2p.pl |
|
| 2015-07-16 08:07:04 |
psl |
attachment added |
|
demo_a2p_x32.pl https://bugs.launchpad.net/ubuntu/+source/perl/+bug/1474366/+attachment/4429932/+files/demo_a2p_x32.pl |
|
| 2015-07-16 08:07:34 |
psl |
attachment added |
|
demo1_a2p_x32.pl https://bugs.launchpad.net/ubuntu/+source/perl/+bug/1474366/+attachment/4429933/+files/demo1_a2p_x32.pl |
|
| 2015-07-16 08:15:48 |
psl |
attachment added |
|
demo_a2p_armhf.pl https://bugs.launchpad.net/ubuntu/+source/perl/+bug/1474366/+attachment/4429956/+files/demo_a2p_armhf.pl |
|
| 2015-07-16 08:16:17 |
psl |
attachment added |
|
demo1_a2p_armhf.pl https://bugs.launchpad.net/ubuntu/+source/perl/+bug/1474366/+attachment/4429958/+files/demo1_a2p_armhf.pl |
|
| 2015-07-16 08:20:16 |
psl |
description |
Ubuntu 14.04.2 LTS, amd64
Package perl 5.18.2-2ubuntu1 amd64
I tried to use a2p translator to convert simple AWK script to PERL script. I see that output is strange, characters are missing or are duplicated.
Example of a2p output, fragment:
lne: while (<>) {
chomp; ## strip record sepparator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
Notice, label lne is there, not line, notice comment "sepparator". This is just an example, a2p creates many similar errors. Other example:
# crreate translation table
for ($i = 32; $i < 28; $i++) {
rintfprintf('%02x', $i)} = sprintf('%c', $i);
}
is is heads header, print it
lie: while (<>>) {
chomp; # stip record separator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
if 0-9]0-9]/) {
Notice, label "lie" is there, not "line", notice comment "crreate", notice that condition in for loop is $i<28 but should be $i<128, notice AWK line
XT[sprintf("%02x", i)]=sprintf("%c", i);
was translated to
rintfprintf('%02x', $i)} = sprintf('%c', $i);
and notice the last line with "if".
My LOCALE:
$ locale
LANG=en_US.UTF-8
LANGUAGE=
LC_CTYPE="en_US.UTF-8"
LC_NUMERIC=en_US.UTF-8
LC_TIME=en_US.UTF-8
LC_COLLATE="en_US.UTF-8"
LC_MONETARY=en_US.UTF-8
LC_MESSAGES="en_US.UTF-8"
LC_PAPER=en_US.UTF-8
LC_NAME=en_US.UTF-8
LC_ADDRESS=en_US.UTF-8
LC_TELEPHONE=en_US.UTF-8
LC_MEASUREMENT=en_US.UTF-8
LC_IDENTIFICATION=en_US.UTF-8
LC_ALL=
I will attach two AWK scripts and two PERL scripts created with a2p, like this: a2p demo.awk > demo_a2p.pl |
Ubuntu 14.04.2 LTS, amd64
Package perl 5.18.2-2ubuntu1 amd64
I tried to use a2p translator to convert simple AWK script to PERL script. I see that output is strange, characters are missing or are duplicated.
Example of a2p output, fragment:
lne: while (<>) {
chomp; ## strip record sepparator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
Notice, label lne is there, not line, notice comment "sepparator". This is just an example, a2p creates many similar errors. Other example:
# crreate translation table
for ($i = 32; $i < 28; $i++) {
rintfprintf('%02x', $i)} = sprintf('%c', $i);
}
is is heads header, print it
lie: while (<>>) {
chomp; # stip record separator
@Fld = split(/[,\n]/, $_, -1);
if (/^C_ID/) {
print $_;
next line;
}
if 0-9]0-9]/) {
Notice, label "lie" is there, not "line", notice comment "crreate", notice that condition in for loop is $i<28 but should be $i<128, notice AWK line
XT[sprintf("%02x", i)]=sprintf("%c", i);
was translated to
rintfprintf('%02x', $i)} = sprintf('%c', $i);
and notice the last line with "if".
My LOCALE:
$ locale
LANG=en_US.UTF-8
LANGUAGE=
LC_CTYPE="en_US.UTF-8"
LC_NUMERIC=en_US.UTF-8
LC_TIME=en_US.UTF-8
LC_COLLATE="en_US.UTF-8"
LC_MONETARY=en_US.UTF-8
LC_MESSAGES="en_US.UTF-8"
LC_PAPER=en_US.UTF-8
LC_NAME=en_US.UTF-8
LC_ADDRESS=en_US.UTF-8
LC_TELEPHONE=en_US.UTF-8
LC_MEASUREMENT=en_US.UTF-8
LC_IDENTIFICATION=en_US.UTF-8
LC_ALL=
I will attach two AWK scripts and two PERL scripts created with a2p, like this: a2p demo.awk > demo_a2p_amd64.pl; a2p demo1.awk > demo1_a2p_amd64.pl |
|
| 2015-07-16 08:29:10 |
psl |
attachment added |
|
demo_a2p_amd64_deb.pl https://bugs.launchpad.net/ubuntu/+source/perl/+bug/1474366/+attachment/4429963/+files/demo_a2p_amd64_deb.pl |
|
| 2015-07-16 08:29:34 |
psl |
attachment added |
|
demo1_a2p_amd64_deb.pl https://bugs.launchpad.net/ubuntu/+source/perl/+bug/1474366/+attachment/4429964/+files/demo1_a2p_amd64_deb.pl |
|
