comment exporter une variable ou un tableau d'une sous routine vers le programme principal ?
j'utilise la sous routine suivante :
hors le tableau @evenement_sql n'est pas présent dans le programme principal, quelqu'un a t'il une idée ??
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 sub evenement_proc { my $ho_name=$_[0]; my @evenement_sql=""; @evenement_sql=qx{echo "set heading off;\n select distinct(v_job) from mc_event_base where ho_name in '$ho_name' and v_job is not null;" | sqlplus -s $USER_ORA/$PASSWD_ORA\@$ORACLE_SID} ; chomp @evenement_sql; }
Partager