Strings konkatinieren (Allgemeines zu Perl)

[thread]8287[/thread]

Strings konkatinieren

paidopoieo

2006-09-01 21:47

User since
2005-12-02
96 Artikel
BenutzerIn
[default_avatar]

hallo leute,

hab folgendes simple problem, ich lese aus einem file ein datum aus (format: 2006/04/07) und will dann noch einen string an das ende anfuegen...aus irgendeinem grund gibt er mir den zusammengesetzen string nicht in einer zeile aus.....setzt es nicht zusammen....

Code: (dl )

#!/usr/local/bin/perl -w

use strict;
use warnings;

open(DAT,"datum.txt");
while(<DAT>)
{
$last_Date_Search = $_;
}
close DAT;
print "The date to search with: ", $last_Date_Search, "\n";

my $date = "'" . $last_Date_Search . ":3000[pdat]'";
print $date, "\n";

ausgabe sieht so aus:
2006/07/14
:3000[pdat]

sollte aber so aussehen: 2006/07/14:3000[pdat]

danke fuer die hilfe

Ronnie

2006-09-01 22:32

User since
2003-08-14
2022 Artikel
BenutzerIn
[default_avatar]

[quote=paidopoieo,01.09.2006, 19:47]...aus irgendeinem grund gibt er mir den zusammengesetzen string nicht in einer zeile aus.....setzt es nicht zusammen....[/quote]
chomp hilft wahrscheinlich:

Code: (dl )

while(<DAT>)
{
chomp;
$last_Date_Search = $_;
}

paidopoieo

2006-09-02 02:41

User since
2005-12-02
96 Artikel
BenutzerIn
[default_avatar]

hi ronnie,

danke, hat super funktioniert

View all threads created 2006-09-01 21:47.