Opened by kale_1990 at 2006-09-15 10:44
User since
2006-09-15
15 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2006-09-15
15 Artikel
BenutzerIn
Im Zusammenhang mit Zahl vs String bin ich übrigens gerade gestern über etwas merkwürdiges gestolpert - laut Data::Dumper sieht $. und 0 + $. aus, als wäre es ein String:
Sehr merkwürdig.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
#!perl -w
use strict;
use warnings;
use Data::Dumper;
my $fname = "testfile.txt";
my $ofh;
open ($ofh, ">", $fname) or die $^E;
print $ofh "Zeile 1\n", "Zeile 2\n";
close $ofh;
my $ifh;
open ($ifh, "<", $fname) or die $^E;
my $line = <$ifh>;
my @ar = (
$., # String?
0 + $., # String - immer noch?
1 + $. - 1, # Zahl
);
my $d = Data::Dumper->new([\@ar], [qw(ar)]);
print $d->Dump;
__END__
Ergibt:
$ar = [
'1',
'1',
1
];
Sehr merkwürdig.