RE: how to print out a variable if theres a . in it?

[TomST]

change the line 
print "Yeeehaaa: $_ \n";
to
print "Yeeehaaa: $SNR_LOG \n";

and it will work fine.
-----Original Message-----
From: Theuerkorn Johannes [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, July 09, 2002 8:10 AM
To: '[EMAIL PROTECTED]'
Subject: how to print out a variable if theres a . in it?


Hello List,

I have a (probably) simple problem: 

IŽam parsing trough a directory an want to print out every filename that exists. 
(later I want to open those files)
Problem is, i have filenames like snr_log.csv,repact.csv,,foo.csv,bar.csv all with a 
period in between...
What I get is an error as follows up...

Any Suggestions?

ERROR:
##########################################################
perl -w verzeichnis.pl
Use of uninitialized value in concatenation (.) at verzeichnis.pl line 15.
Yeeehaaa:
Use of uninitialized value in concatenation (.) at verzeichnis.pl line 15.
Yeeehaaa:
Use of uninitialized value in concatenation (.) at verzeichnis.pl line 15.
Yeeehaaa:
Use of uninitialized value in concatenation (.) at verzeichnis.pl line 15.
Yeeehaaa:
Use of uninitialized value in concatenation (.) at verzeichnis.pl line 15.
Yeeehaaa:
Use of uninitialized value in concatenation (.) at verzeichnis.pl line 15.
Yeeehaaa:
Use of uninitialized value in concatenation (.) at verzeichnis.pl line 15.
Yeeehaaa:
##########################################################


this is verzeichnis.pl
#########################################

#/usr/bin/perl -w

use strict;

my $qis_root = "/home/user1/DiREx/test";
my $SNR_LOG;
chdir($qis_root)|| die "canŽt change to $qis_root!";

while (defined($SNR_LOG = <*>)){
#print "$dateien\n";
parse_logs($SNR_LOG);
}
sub parse_logs{

print "Yeeehaaa: $_ \n";

}
##########################################

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]