Bonjour a tous,

Petit probleme en Perl avec les functions push/pop, qui s'effectuent sur une table.
J'ai une fonction qui doit recevoir un tableau et dans laquelle je dois faire un push/pop:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
sub func_tasks{
    my $task                 = $_[0];
    my $flag_task            = $_[1];      
    my $ref_table_task       = $_[2];
    my $ref_table_start_task = $_[2];
    my $ref_trace_param      = $_[4];
    my $temp;
    if    ($flag_task == 4) 
    {
                             push(??ref_table_start_task, $task);
    }
    elsif ($flag_task == 5) 
    { 
      $temp = pop(??ref_table_start_task);
      print "\r\n o task      : $temp\r\n";
    }       
}
Le probleme est que ma reference n'est pas une table mais une reference..
Comment proceder sans faire une copie locale de ma table d'origine ?
N'y a t il pas une autre fonction permettant de faire ce push/pop ?

Merci beaucoup d'avance,

cdlt