Perl referens problem

2011-07-01, 19:50 #1

Medlem

Reg: Feb 2010

Inlägg: 30

Hej!

Håller på med ett litet script:

Kod:

#!/usr/bin/perl
use strict;

my $CanFrame;
my @testArray1;
my @testArray2;

@testArray1 =(1,2,3,4);
@testArray2 =(5,6,7,8);

$CanFrame => 	{
			elem1 =>@testArray1,
			elem2 =>@testArray2
		};
print "--\n";
print $CanFrame->{elem1}->[0];
print "--\n";

Problemet blir att det enbart skrivs ut
--
--

dvs värdet av $CanFrame->{elem1}->[0] är tomt.

Har säkert gjort något grundläggande fel, men kan inte hitta det. Nån som kan se felet?

Citera

2011-07-01, 21:33 #2

Medlem

Reg: Sep 2007

Inlägg: 26

Citat:

Ursprungligen postat av G3t0st

Har säkert gjort något grundläggande fel, men kan inte hitta det. Nån som kan se felet?

Det första grundläggande felet är att du inte har lagt till use warnings; i början av ditt script.
Det hjälper dig med ditt första problem.

Citat:

Ursprungligen postat av G3t0st

print $CanFrame->{elem1}->[0];

Antyder att elem1 pekar på en referens till en array... Gör den det?

Kod:


# En bra modul att använda om man jobbar mot datastrukturer 

# är Data::Dumper, förutsatt att den finns med i din perl installation.

use Data::Dumper;

print Dumper($CanFrame);

Citera

Perl referens problem

Stöd Flashback