Lines Matching refs:i
618 my $i;
620 for ($i=0; $i<=$#macros; $i++) {
621 $line =~ s/$macros[$i][0]/$macros[$i][1]/gi
637 for (my $i=0; $i <= $#action_data; $i++) {
638 &{"do_".$action_data[$i][0]}($action_data[$i][1]);
639 if ( $action_data[$i][0] eq 'mkdir' ) {
642 unshift @dirlist, $action_data[$i][1];
707 for (my $i = 0; $i <= $#copy_files; $i++) {
708 next if filter_out($copy_files[$i][0]); # apply copy filter
709 copy_if_newer($copy_files[$i][0], $copy_files[$i][1], $touch)
967 my (@field_a, @field_b, $i);
974 for ($i = 0; $i < 3; $i++)
977 $field_a[$i] //= 0;
978 $field_b[$i] //= 0;
979 if ( ($field_a[$i] < $field_b[$i]) ) {
982 if ( ($field_a[$i] > $field_b[$i]) ) {
1063 for (my $i = 0; $i <= $#addincpath_list; $i++) {
1064 my @field = split('/', $addincpath_list[$i][0]);
1069 for (my $i = 0; $i <= $#addincpath_list; $i++) {
1070 … add_incpath_if_newer($addincpath_list[$i][0], $addincpath_list[$i][1], \@addincpath_headers)