代码搜索:如何学习 PL?
找到约 10,000 项符合「如何学习 PL?」的源代码
代码结果 10,000
www.eeworm.com/read/249786/12474292
pl teststdin.pl
use strict;
while(){
print "The test is successful.";
}
#If you want to jump out from the while,you should input the number '-1'.
www.eeworm.com/read/249786/12474293
pl testmkdir.pl
mkdir "e:/testtt",0755 or warn "Cannot creat the directory:$!";
$num_rm=rmdir "e:/testtt";
print "$num_rm";
#The two functions will return the number of the files created or deleted.
#0755 IS sugg
www.eeworm.com/read/249786/12474296
pl testdefine.pl
$madonna=;
If($defined($madonna)){
print “The input was $madonna”;
}else{
print “No input available!\n”;
}
www.eeworm.com/read/249786/12474297
pl testread.pl
open(FILE,"e:/asd.txt")||die("Cannot open the file:$!!");
@string=;
for($i=0;$i
www.eeworm.com/read/336131/12475229
pl srecswap.pl
#!/usr/bin/perl
# endian-swap S records; we need this because the JTAG tools we're using
# expect the memory image in byte-swapped format
#
# Jonathan Westhues, April 2004
if(@ARGV == 0) {
www.eeworm.com/read/249774/12475370
in makefile.pl.in
use ExtUtils::MakeMaker;
# See lib/ExtUtils/MakeMaker.pm for details of how to influence
# the contents of the Makefile that is written.
WriteMakefile(
'CC' => '@CXX@',
'NAME' => 'TinySVM',
www.eeworm.com/read/335984/12484606
pl regs.pl
#!/usr/bin/perl
# $Id: regs.pl,v 1.1 2002/06/06 02:41:21 hpa Exp $
#
# Read regs.dat and output regs.h and regs.c (included in names.c)
#
$nline = 0;
sub process_line($) {
my($line) = @
www.eeworm.com/read/335984/12484673
pl macros.pl
#!/usr/bin/perl -w
#
# macros.pl produce macros.c from standard.mac
#
# The Netwide Assembler is copyright (C) 1996 Simon Tatham and
# Julian Hall. All rights reserved. The software is
# redi
www.eeworm.com/read/335984/12484703
pl insns.pl
#!/usr/bin/perl
#
# insns.pl produce insnsa.c, insnsd.c, insnsi.h, insnsn.c from insns.dat
#
# The Netwide Assembler is copyright (C) 1996 Simon Tatham and
# Julian Hall. All rights reserved.
www.eeworm.com/read/335984/12484737
pl mkdep.pl
#!/usr/bin/perl
#
# Script to create Makefile-style dependencies.
#
# Usage: perl mkdep.pl [-s path-separator] [-o obj-ext] dir... > deps
#
use File::Spec;
use File::Basename;
use Fcntl;