Perl Structures into array

Question

one simple question, but I couldn't find the solution anywhere. I have a text file which consists of students, lets say, and looks like this:

1 bob smedley 4
2 rob nielsen 7
3 sol connie 9
4 jon sidney 18

Then I have a structure Student, that looks like this:

struct Student => {ID => '$', name  => '$', surname => '$', points => '$',};

I loaded this text file into an array using: @stud = <inFILE>;

And now I want to load each row from my @stud into an array of Student structures. Let's call it my @students; so that for example, my first structure looks like this:

id = 1;
name = bob;
surname = smedley;
points = 4;

And do that for every row in @stud. Alternatively, I could load those structures directly from file, but I was thinking it might be easier using temp array @stud.

choroba · Accepted Answer · 2013-04-09 12:03:33Z

4

You do not need to slurp the file into an array. You can process it line by line:

#!/usr/bin/perl
use warnings;
use strict;

use Class::Struct;
struct Student => {ID => '$', name  => '$', surname => '$', points => '$',};

my @students;

while (<>) {
    my ($id, $name, $surname, $points) = split;
    my $s = Student->new;
    $s->ID($id);
    $s->name($name);
    $s->surname($surname);
    $s->points($points);
    push @students, $s;
}

answered Apr 9, 2013 at 12:03

choroba

245k27 gold badges221 silver badges304 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

choroba Over a year ago

@Whizzil: Remove the prototypes.

choroba Over a year ago

@Whizzil: Read perlsub and Far More Than Everything You've Ever Wanted to Know about Prototypes in Perl.

Collectives™ on Stack Overflow

Perl Structures into array

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related