[perl] Stringa e sua lunghezza

[lupo987]

Sto cercando di effettuare uno script di archiviazione in perl ma sto riscontrando una sola difficoltà in una concatenazione di stringhe, vi posto un esempio per farvi capire di che problema si tratta:

$card=$prefix1.$anno.$underscore.$mese.$underscore .'*';
ecco questa stringa se la stampo a video su OS Unix viene fuori cosi
Ciccio_Log_2010 invece che Ciccio_Log_2010_01*
_01*

Grazie Mille.
Ciao

[Mich_]

Devi farti stampare tutte le variabili coinvolte, ad esempio:

$card=$prefix1.$anno.$underscore.$mese.$underscore.'*'\n; 
print '#'.$card.'#'\n;
print '#'.$prefix.'#'\n;
print '#'.$underscore.'#'\n;
print '#'.$anno.'#'\n;
print '#'.$mese.'#'\n;

E verificare cosa contiene ciascuna variabile.
I # sono per essere sicuro di cosa stai stampando. In qualche variabile ci potrebbe essere qualche carattere strano (uno spazio, un carattere di controllo, ...) che impediscono alla stringa di essere concatenata correttamente
.

[lupo987]

# Prefix:0
# Mese:01
# mese modif:01# Security:ciccio_Log_2010
01*

Ecco che cosa viene fuori dalle istruzioni che mi hai postato.
spero di riuscire capire cosa stia accadendo per adesso ho anche impsotato -w
sulla istruzione di effettuare il debug sull mio script.
ma non viene fuori niente di anomalo

[Mich_]

Queste risposte non sono congruenti con il codice postato e con il risultato da te presentato nel primo post.
(l'ordine e` diverso ed anche il contenuto)

Prova a postare nuovamente le risposte ed anche il codice usato (deve essere il codice che ha dato le risposte presentate).

PS: usa i tag VB, altrimenti si perde la formattazione (ad esempio usa il bottone # sopra il campo di inserimento testo)

[lupo987]

Scusami alla fine ho optato per bash anche se più rognoso.
Grazie dell'aiuto.