special character printing issue

[mitchreward]

Hi,

I run a bash script inside perl. The output of the bash script sometime has special charaters: é è à ê ...

When i print my variable containing this return,the output is truncated. Any idea ? Is this a perl issue ?

here is an extract

my $smtpban = `smtpban -s $email | tail -n +20`;

my $out = $cerb->post($base . "tickets/$id/comment.xml", [
                    [ 'comment', "this is an automatic comment \n\n $b
+an_msg \n\n banvhost -c \n $banvhost \n\n\n smtpban -s \n\n $smtpban"
+ ],
                    ]);

[choroba]

Maybe you need Encode?

use Encode qw{ decode };
my $smtpban = decode('utf-8', qx{ smtpban -s $mail | tail -n +20 });

[Anonymous Monk]

Well, that code does no printing :)

What does Data::Dump::dd( $smtpban ); print?

ddumpering^{Basic debugging checklist} to visualize your data (lesson courtesy of Basic debugging checklist and brian's Guide to Solving Any Perl Problem )

perlunitut: Unicode in Perl#I/O flow (the actual 5 minute tutorial) and Is there a way to automatically decode or encode?

[Laurent_R]

Hmm, difficult to say with so few details, but you may want to take a look at the encode and decode functions of the Encode module. Please show the output of your bash script (without Perl) and of your Perl script.