代码搜索：while
找到约 10,000 项符合「while」的源代码
代码结果 10,000
www.eeworm.com/read/131315/5935779
man2mus
#!/usr/bin/perl
while () {
if (/^\.SH SYNOPSIS/) {
$spec = '';
for ($_ = ; $_ && !/^\.SH/; $_ = ) {
s/^\.[IRB][IRB]\s*//;
s/^\.[IRB]\s+//;
next if /^\./;
s/\\f\w//g;
www.eeworm.com/read/131315/5935855
t argv.t
#!./perl
# $Header: argv.t,v 4.0 91/03/20 01:50:46 lwall Locked $
print "1..5\n";
open(try, '>Io.argv.tmp') || (die "Can't open temp file.");
print try "a line\n";
close try;
$x = `./perl -e 'whil
www.eeworm.com/read/131315/5935954
travesty
#!/usr/bin/perl
while () {
next if /^\./;
next if /^From / .. /^$/;
next if /^Path: / .. /^$/;
s/^\W+//;
push(@ary,split(' '));
while ($#ary > 1) {
$a = $p;
$p = $n;
$w =
www.eeworm.com/read/131315/5935957
muck
#!../perl
$M = '-M';
$M = '-m' if -d '/usr/uts' && -f '/etc/master';
do 'getopt.pl';
do Getopt('f');
if ($opt_f) {
$makefile = $opt_f;
}
elsif (-f 'makefile') {
$makefile = 'makefile';
}
el
www.eeworm.com/read/131315/5936082
c util.c
/***************************************************************************
* This program is Copyright (C) 1986, 1987, 1988 by Jonathan Payne. JOVE *
* is provided to you without charge, and with
www.eeworm.com/read/131315/5936855
c mywc.c
/* A simple but fairly efficient C version of the Unix "wc" tool */
#include
#include
main()
{
register int c, cc = 0, wc = 0, lc = 0;
FILE *f = stdin;
while ((c = getc(f)) !
www.eeworm.com/read/131315/5937337
awk nicnet.awk
BEGIN { FS = ":" }
/^NET/ {
ip = $2;
while (substr(ip,1,1) == " ") ip = substr(ip,2,length(ip)-1);
while (substr(ip,length(ip),1) == " ") ip = substr(ip,1,length(ip)-1);
name = $3;
while (su
www.eeworm.com/read/131315/5937705
c hist.c
/*
* Copyright (c) 1994 David I. Bell
* Permission is granted to use, distribute, or modify this source,
* provided that this copyright notice remains intact.
*
* Adapted from code written by Ste
www.eeworm.com/read/131315/5938171
c glob.c
/* $Header: glob.c,v 2.0 85/11/21 07:22:47 jqj Exp $ */
/*
* $Log: glob.c,v $
* Revision 2.0 85/11/21 07:22:47 jqj
* 4.3BSD standard release
*
* Revision 1.2 85/11/21 07:04:29 jqj
* adde
www.eeworm.com/read/131315/5938190
c glob.c
/* $Header: glob.c,v 2.0 85/11/21 07:22:47 jqj Exp $ */
/*
* $Log: glob.c,v $
* Revision 2.0 85/11/21 07:22:47 jqj
* 4.3BSD standard release
*
* Revision 1.2 85/11/21 07:04:29 jqj
* adde