如何处理这行错误消息?
Please install the gcc make perl packages from your distribution。
执行命令行:yum install gcc perl make
输出:
Loaded plugins: product-id, search-disabled-repos, subscriptio ...……
use SDL;
use SDLx::App;
my $app=SDLx::App-amp;amp;gt;new(w=amp;amp;gt;400,h=amp;amp;gt;400,d=amp;amp;gt;32,t=amp;amp;gt;amp;quot;我的第二个程序amp;quot;);
#画大地
$app-amp;amp;gt;draw_rect(,);
#画夜空 ...……
Apache 1.3.22 for Win32+PHP 4.0.6+Active Perl 5.006001+Zend Optimizer v1.1.0+mod_gzip 1.3.19.1a+MySQL 4.0.0 Alpha Apache 1.X for win32虽然**能差(和IIS比起来差太远了,希望2.X for wi ...……
#!/usr/bin/perl -w
my $secret_num = int(1 + rand 100);
print “Don’t tell anyone, but the secret number is $secret_num.\n”;
while(1) {#无限的while循环
print “Please enter a guess from 1 to 100:\n” ...……
https://www.cnblogs.com/albertYe/p/8819143.html
***************************************************************
在*nix系统下使用Perl脚本有时会遇到如下错误:/usr/bin/perl^M: bad interpreter: No such fi ...……
代码如下
use strict;use warnings;# Print all files in a directorysub print_files {my $dir = 'd:/code';opendir DIR, $dir or die $!;my @files = readdir DIR;chdir $dir; # Use chdir or -f will not work, ...……
use SDL;
use SDLx::App;
use SDL::Event;
my $app=SDLx::App-amp;amp;gt;new(w=amp;amp;gt;400,h=amp;amp;gt;400,d=amp;amp;gt;32,t=amp;amp;gt;amp;quot;my linesamp;quot;);
my $color =;
my $drawing=0;
my $st ...……