小编ice*_*old的帖子

在脚本中设置数字变量(“set $i 1”)不起作用(“echo $i”为空)

正如标题所说,我需要一个 bash 脚本的帮助,该脚本必须生成一个给定两个数字变量的字符串。该字符串将用于生成文件名,但是当我测试名称生成代码时,它什么也没产生

脚本是下面的代码

# !usr/bin
set nombre
declare -a i
declare -a j

set $i  1
set $j  2

set nombre "$i\_$j.txt"

echo $i
echo $j
Run Code Online (Sandbox Code Playgroud)

这是它产生的结果:

entropy@3PY:~$ ./test4
Run Code Online (Sandbox Code Playgroud)

正如你所看到的,它应该产生任何东西,而它应该产生

1
2
Run Code Online (Sandbox Code Playgroud)

提前致谢

bash

1
推荐指数
1
解决办法
87
查看次数

需要帮助在 perl 中填充结构数组

我需要一些帮助来填充由 perl 中的结构组成的数组。

数组的数据来自具有以下格式的 .SH 文件:

108,Country,Location,ap17,ip_149,ssh,model,12/8/2020
Run Code Online (Sandbox Code Playgroud)

我使用的代码如下:

use strict;
use warnings;
use Class::Struct;

struct(Net_Node => [hostname => '$', dir_ip => '$', access => '$', user => '$', pass => '$']);

my $node = Net_Node->new();
my @nodes;

my $user = "hjack";
my $pass = 'butstalion';

my $line;
my @all;

my $counter=0;

open(my $fh, '<', "exaple.sh") or die "Failed to open especified file";
#system('clear');

foreach $line (<$fh>) {

        @all=split(',', $line);


        $node->hostname ($all[3]);
        $node->dir_ip ($all[4]);
        $node->access ($all[5]);
        $node->user ($user);
        $node->pass ($pass);

        $nodes[$counter] …
Run Code Online (Sandbox Code Playgroud)

arrays perl struct

1
推荐指数
1
解决办法
69
查看次数

标签 统计

arrays ×1

bash ×1

perl ×1

struct ×1