小编paw*_*yan的帖子

如何使用tcl逐行读取大文件?

我使用while循环编写了一段代码,但是逐行读取文件需要花费太多时间.有人能帮帮我吗?我的代码:

   set a [open myfile r]              
   while {[gets $a line]>=0} {   
     "do somethig by using the line variable" 
   }
Run Code Online (Sandbox Code Playgroud)

file tcl

5
推荐指数
1
解决办法
2万
查看次数

如何更改我的tcsh提示以显示我当前的工作目录?

我正在使用tcsh,我正在寻找一种方式响应工作目录,我至少想显示最后一个文件夹名称,而不是获取完整路径.

想象一下我当前的工作目录是:

  [user@hostname/home/us/Desktop/my/projects]
Run Code Online (Sandbox Code Playgroud)

然后我想显示如下提示:

    [user@hostname projects] 
Run Code Online (Sandbox Code Playgroud)

目前我正在使用.cshrc我写的文件中的文件:

  alias setprompt 'set prompt="[suman@`hostname` `pwd`:~] $"'
  alias setprompt 'set prompt="${LightGreen}[${yellow}suman${Light}${LightPurple}@%m ${LightGreen}:~] ${yellow}$ ${end} "'
Run Code Online (Sandbox Code Playgroud)

我也没有PS1变量,也不知道它的作用,我想知道.cshrc文件和.bashrc文件之间的区别.

csh tcsh

4
推荐指数
2
解决办法
2万
查看次数

在void上下文中无用的使用数字lt(<)

我很抱歉这个可能很愚蠢的问题,但我收到以下警告:

"Useless use of numeric lt (<) in void context"
Run Code Online (Sandbox Code Playgroud)

运行此代码时:

   for (my $j=0, my $k = 0; $j < @name,$k < @name_mod;) {               
        #doing something   
   }
Run Code Online (Sandbox Code Playgroud)

任何人都知道如何解决它?,任何建议非常感谢

perl

2
推荐指数
2
解决办法
969
查看次数

标签 统计

csh ×1

file ×1

perl ×1

tcl ×1

tcsh ×1