my ($subj_num, $region, $region1, $region2, $time); # put as many as you like here my ($abs_time, $max_peak_time) = (50, 2050) # you can initialize multiple vars like this.