#!/usr/bin/perl
# countlines2.pl by Bill Weinman <http://bw.org/contact/>
# Copyright (c) 2010 The BearHeart Group, LLC
use strict;
use warnings;
sub main {
my @values = (43,123,5,89,1,76);
my @values1 = sort(@values);
foreach $value(@values1){
print "$value\n";
}
}
Errors -
"Global symbol "$value" requires explicit package name at task2.txt line 12
"Global symbol "$value" requires explicit package name at task2.txt line 13
Run Code Online (Sandbox Code Playgroud)
我是perl的初学者,所以我遇到了上述错误.另外请告诉我默认情况下perl如何对数字进行排序(例如,排序(@values)会产生什么?).
这是我的布局.

两个单选按钮应位于欢迎标签下方.
像这样:
__________________________
| |
| WELCOME |
| * * |
| |
| |
| |
|________________________|
Run Code Online (Sandbox Code Playgroud)
两个星号是单选按钮.
我的代码:
northpanel.setLayout(new FlowLayout(FlowLayout.CENTER));
northpanel1.setLayout(new FlowLayout(FlowLayout.CENTER));
northpanel.add(welcome); //this welcome text label
northpanel1.add(r1); //this radio 1
northpanel1.add(r2); //this radio 2
add(northpanel,BorderLayout.NORTH);
add(northpanel1,BorderLayout.NORTH);
Run Code Online (Sandbox Code Playgroud) 我只是想知道是否有可能在亚马逊 API 中只获得在 AmazonGlobal 下列出的产品,并且能够运送到某些国家,如新加坡。
从我在 AmazonGlobal 部分购物时看到的情况来看,在我将产品添加到购物车并单击“估计运费”然后它要么去之前,我将无法判断该产品是否能够运送到我的国家/地区通过或显示“此商品无法运送到您的国家/地区”。
<%@ page import ="java.util.*" %>
<%@ page import ="book.*" %>
ArrayList movies = (ArrayList) request.getAttribute("movieinfo");
if(movies!=null){
for(int i=0;i<movies.size();i++){
movie b = (movie) movies.get(i);
out.println("<tr>");
out.println("<td>" + b.getMovieID() + "</td>");
out.println("<td>" + b.getMovieTitle() + "</td>");
out.println("<td>" + b.getReleaseDate() + "</td>");
out.println("<td>" + b.getDescription() + "</td>");
out.println("<td>" + b.getImage() + "</td>");
}
}
Run Code Online (Sandbox Code Playgroud)
嗨,我试图循环电影的arraylist.但是我收到一个错误:
movie是一个java值bean
org.apache.jasper.JasperException: Unable to compile class for JSP:
An error occurred at line: 80 in the jsp file: /index.jsp
movie cannot be resolved to a type
77:
78: …Run Code Online (Sandbox Code Playgroud) 嗨,我有一个文件,其中包含以下行:
wwa weweweof ewewe wdw:
1 11 ms <1 ms <1 ms 174.78.134.1
2 11 ms <1 ms <1 ms 174.78.134.1
3 5 ms <1 ms <1 ms x58trxd00.abcd.edu.com [143.71.290.42]
4 11 ms <1 ms <1 ms 174.78.134.1
Run Code Online (Sandbox Code Playgroud)
我在用
if(linecount == 8)
while( fscanf(fp, "%d %s %s %s %s %s %s",&a1,&a2,&a3,&a4,&a5,&a6,&a7,&a8) != EOF ){
printf("%s",ch);
}
else if (linecount == 9){
while( fscanf(fp, "%d %s %s %s %s %s %s %s",&a1,&a2,&a3,&a4,&a5,&a6,&a7,&a8,&a9) != EOF ){
printf("%s",ch);
}
}
Run Code Online (Sandbox Code Playgroud)
我如何检查文件中的行行是否包含8或9个元素,以便我可以相应地运行上述else-if语句?
我正在尝试设计一个从文件中获取数据的程序,之后它为唯一数据提供编号,链表还包含父列表和子列表.
数据结构:
____A
/ |
B C
| / \
E--> F G
| | |
I J K
Run Code Online (Sandbox Code Playgroud)
节点可以具有多个下一个节点(例如A和C),并且可以具有多于一个的先前节点.
文本文件包含这样的数据,我将从文件中获取数据并将其转换为链接列表:
A
B
E
I
A
C
E
F
J
A
C
G
K
Run Code Online (Sandbox Code Playgroud)
我的问题:是否可以使用具有多个下一个或多个先前节点的节点创建链接列表,如果是这样,结构将如何显示?
我尝试过的:
我创建了一个结构,其中包含父和子的4个整数数组.
struct abcd{
char data;
int nodeid;
int parent[4];
int child[4];
struct abcd *next;
}
Run Code Online (Sandbox Code Playgroud)
因此,父数组保存最前一个节点的node-id (可以是多个,因为例如E(B&C指向它) - >(node-id-1).
子数组包含即时下一个节点(node-id +1)的node-id.
A或任何其他节点没有重复的节点.
OUTPUT:
1 : A <--
2 : B <-- 1
3 E <-- 2,5
4 …Run Code Online (Sandbox Code Playgroud) 我有两个字符串ip1 = "192.168.145.123"和ip2 = "172.167.234.120".
我可以比较这两个字符串是否相等:
strncmp(ip1,ip2) == 0
Run Code Online (Sandbox Code Playgroud)
但是我怎么能找到答案
if (ip1 > ip2) {
...
}
Run Code Online (Sandbox Code Playgroud)
我试过了什么
我可以使用sscanf:
sscanf(ip1,"%d.%d.%d.%d",&s1,&s2,&s3,&s4)
Run Code Online (Sandbox Code Playgroud)
并存储数字并进行比较.但是在32位中,由于上限,我无法将数字存储为整数.
因此,我别无选择,只能将整数作为字符串进行比较.
sub open_directory {
my $directory = shift @_;
my @files = ();
opendir (my $dh, $directory) or die "Couldn't open dir '$directory' : $!";
my @all_files = readdir $dh;
closedir $dh;
foreach my $files(@all_files){
while($files =~ /\.htm/){
push(@files);
}
}
return @files;
}
Run Code Online (Sandbox Code Playgroud)
错误在代码push(@files);
错误是:
Useless use of push with no values
我想使用正则表达式来处理名称结尾.htm或.html在@files数组中的文件,/\.htm/请帮助我.
嗨,我想整合4个整数一个整数.我使用了这里找到的concatinate函数:
我的代码:
unsigned concatenate(unsigned x, unsigned y) {
unsigned pow = 10;
while(y >= pow)
pow *= 10;
return x * pow + y;
}
void stringtoint(){
struct router *ptr;
ptr=start;
while(ptr!=NULL){
int a;
int b;
int c;
int d;
sscanf(ptr->ip, "%d.%d.%d.%d", &a, &b, &c, &d);
int num1 = concatenate(a,b);
int num2 = concatenate(c,d);
int num3 = concatenate(num1,num2);
printf("%d\n",num3);
ptr=ptr->next;
};
}
Run Code Online (Sandbox Code Playgroud)
问题:
我正在处理IP地址编号,例如198.32.141.140我将它们分解为4个整数并将它们连接起来形成 19832141140,但是我的连接函数正在对较大的数字进行数学运算,如198.32.141.140(变) - > -1642695340
但它连接的是小数字的IP,例如164.78.104.1变得164781041(这是正确的)
我应该怎么解决这个问题,基本上我试图让IP例如串 …
sub maxNum {
if (@_ == 1) {
return $_[0]; # terminal clause - return immediately
}
my ($first, @rest) = @_;
my $remainingMax = maxNum(@rest);
if ($first > $remainingMax) {
return $first;
}
return $remainingMax;
}
Run Code Online (Sandbox Code Playgroud)
我无法消化这段使用递归的代码.基本上我对这my $remainingMax = maxNum(@rest);部分感到困惑.
我只是想知道$remainingMax当脚本第一次运行时如何找到值,之后我明白该函数maxNum(@rest)通过返回ans(即,return $first或者return $remainingMax)来提供值.