http://www.perlmonks.org?node_id=1031410


in reply to Removing spaces from query results

I would use LTRIM(RTRIM(...)) on the SQL side.
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Replies are listed 'Best First'.
Re^2: Removing spaces from query results
by Anonymous Monk on Apr 30, 2013 at 14:11 UTC
    I did but it doesn't work <code>..RTRIM(LTRIM(name)) as name..." I have to do it in the Perl.
[reply]
      Strange. Works for me: 
      #!/usr/bin/perl
use warnings;
use strict;

use DBI;

my $db = DBI->connect('dbi:SQLite:dbname=1.db', q(), q());
$db->do('CREATE TABLE T (name varchar)');

my $insert = $db->prepare('INSERT INTO T VALUES(?)');

for my $name (qw(Matthew Mark Luke John)) {
    $insert->execute((' ' x rand 10) . $name . (' ' x rand 10));
}

my $select = $db->prepare('SELECT LTRIM(RTRIM(name)) AS name FROM T');
$select->execute;
while (my $name = $select->fetchrow_arrayref) {
    print "|$name->[0]|\n";
}

      [download]

      Output: 

      |Matthew|
|Mark|
|Luke|
|John|

      [download]
      لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom