Lines Matching refs:_
92 $makeENV{$_} = $ENV{$_} if $ENV{$_};
289 @argv = @_;
356 local($num) = shift @_;
359 while (@_)
361 $newnum = shift @_;
373 local($width, $string) = @_;
531 local(@files) = @_;
543 local($plname,@moreusage) = @_;
557 local(@morehelp) = @_;
619 $depth = defined ($_[0]) ? $_[0] : 1;
626 local($message) = $_[0];
629 if (defined ($_[1]))
631 $caller = &get_caller ($_[1] + 1) . " -> $caller";
639 local($answer,$logfile) = @_;
694 local($filename) = @_;
710 local ($filename) = @_;
778 print "\nrun_command: @_\n" if $debug;
779 $code = system @_;
780 print "run_command: \"@_\" returned $code.\n" if $debug;
801 $code = system @_;
804 print "run_command_with_output: '@_' returned $code.\n" if $debug;
815 local ($targetdir) = @_;
842 local ($dirhandle, $targetdir) = @_;
859 if (-d _ && &remove_directory_tree_inner ($subdirhandle, $object))
901 foreach $file (@_) {
915 &touch(@_);
917 local (@s) = stat($_[0]);
919 utime($s[8]+$off, $s[9]+$off, @_);
926 local ($filename, @lines) = @_;
948 local ($basedir, %dirtree) = @_;
988 local ($basedir, %dirtree) = @_;
1039 if (-d _ && opendir (DIR, "$basedir/$path") )
1043 @files = grep (!/^(\.\.?|CVS|RCS)$/ && ($_ = "$path/$_"), @files);
1058 if (-l _ || !-f _)
1079 if (!-l _)
1128 local($num) = @_;
1147 local($no_increment) = @_;
1179 local($no_increment) = @_;