每天一个tcl脚本-第3天

最新推荐文章于 2024-10-12 14:03:51 发布

原创

最新推荐文章于 2024-10-12 14:03:51 发布 · 428 阅读

3 ·

CC 4.0 BY-SA版权

文章标签：

#word #python #开发语言 #后端

题目：统计文本中单词出现的频率
编写一个脚本，读取一个文本文件，统计其中每个单词出现的次数，然后按照出现次数从高到底的顺序输出单词和次数
我写的版本：

set in_file [open "./in.f" r]
set out_file [open "./out.f" w]

set in_list [regexp -all -inline {
   
   \w+} [read $in_file

最低0.47元/天解锁文章

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

LRRRUI

关注关注

0
点赞
踩
3

收藏

觉得还不错? 一键收藏
0
评论
分享

复制链接

分享到 QQ

分享到新浪微博

扫一扫
举报

举报

专栏目录

【TCL 脚本学习 1 -- tcl 脚本常用命令介绍】

CodingCos的博客

11-06

3101

中括号：在TCL中，中括号用于包含一段要立即执行的命令，然后将其结果替换为这个命令的输出。这是命令替换的一种形式。# 输出 "x is 20"在上面的例子中，""被包含在中括号内，所以它将被立即执行，其结果（20）将替换整个中括号表达式。大括号：在TCL中，大括号用于创建一个字面字符串，即大括号内的内容将不进行任何替换或变量解析。这在创建脚本或表达式时非常有用，可以防止数据被提前解析。# 执行脚本在上面的例子中，"set x 10;puts $x。

Tcl基础知识

夏风喃喃的博客

08-02

4665

Tcl（Tool Command Language）脚本语言基础知识。

参与评论您还未登录，请先登录后发表或查看评论

tcl脚本中的info用法

hzmscut的博客

10-12

1519

在中，info命令用于获取与程序执行状态相关的各种信息。它能够返回当前环境中的变量、命令、函数等的详细信息，是调试和控制流程时非常有用的工具。以下是info。

第10章Tcl脚本编程（一）

weixin_43816759的博客

06-30

2810

TCL基础知识

2021-03-03

weixin_39976450的博客

03-03

508

Quartus ii分配引脚的三种方式在Altera公司提供的Quartus ii软件里，我们可以发现三种分配管脚的方式。 1.使用tcl脚本的方法 (1) 生成tcl文件。project--->Generate Tcl File forproject... （2）找到"set_location_assignment"字段编辑管脚。例： ........ set_location_assignment PIN_D13 -to iCLK set_location_ass...

tcl脚本学习记录

知识，既贵，又便宜。

12-14

1890

TCL通常是使用EDA工具的交互语言。

Tcl——统计文件中某个字符串的个数

qq_36480087的博客

12-10

2241

使用如下代码： set file_handle [open a.txt r] #read命令读取文件内容 puts [regexp -all "1" [read $file_handle]] #all参数返回匹配项总数

每天一个tcl脚本练习-第1天

LRRRUI的博客

02-23

1036

使用tcl语言处理文件中字符串替换的脚本，适用正则匹配，regsub,string map

tcltk-86-64.zip

05-19

此外，TCL/TK还有一套丰富的第三方扩展，如 Expect，用于自动化交互式程序，或者 itk，提供面向对象的编程模型。总结来说，"tcltk-86-64.zip"是一个针对64位系统的TCL/TK相关压缩包，包含了构建和运行TCL/TK应用...

查找字符串出现的次数

xmind

05-13

1505

【关键字】tcl 查找字符串重复次数 tcl中没有直接查找字符串出现次数的命令，不过可以用regsub来代替。 set lines [regsub -all \n $reply {} junk] lines 就是reply 中出现 \n的次数，也可以将lines 理解为reply 是多少行。...

TCL脚本-系统输入和输出

08-06

所有这些都是通过一个file命令来完成�其语法都非常简单�所以我们这里只是按照分类�列举出该命令的各种用法�文件属性操作命令用法描述fileatimename?

TCL脚本学习资料——入门必看

11-02

想学习TCL脚本语言的可以下载，压缩包有相关的TCL教程，很适合自学入门的新手看，需要的自己下

元素出现次数统计

Maxwell__726的博客

04-04

846

如何查找序列中出现次数最多的元素或者说如何统计序列中元素的出现次数.也会你会想到遍历,建立字典,计数…..但是今天要告诉你的是,其实这些工作都不用自己做,Collections.Counter类就是为这种需求量身定做的.看代码:>>>words = ['look', 'into', 'my', 'eyes', 'look', 'into', 'my', 'eyes','the', 'eyes', '

TCL脚本练手

qq1641070658的博客

05-15

361

1. list的使用。

VIVADO 之 TCL脚本工具（基本语法）

timeless_2014的博客

09-10

8936

TCL脚本语言注：TCL在VIVADO中的具体使用将写在VIVADO 之 TCL脚本工具 [下]中，本文只有TCL语法 Tcl（Tool Command Language）是一种很通用的脚本语言，它几乎在所有的平台上都可以解释运行，而且VIVADO也提供了TCL命令行。最近发现TCL脚本貌似比GUI下操作VIVADO效率高一些，方便一些。而且最近跟着官网文档做SDSOC的flatfor...

嵌入式系统那些事—脚本语言tcl

linus_ben的博客

09-04

3099

tcl脚本语言在嵌入式开发，通信设备开发调试中经常被用到。它是一种跟shell语言类似的解释型语言，不需要编译就可以运行，语法简单，作为程序员可以在几小时或者几天内就可以熟练掌握，但是它网络功能强大，又是开源免费的，因此在日常的网络设备调试，自动化测试，复现定位概率性问题中被广泛使用。参考文献【1】【2】的两个链接是tcl脚本的基本语法学习路径，笔者将其中重要的语法点总结如下图所示。图中上半部分是tcl的特点，下半部分是从文件和函数的视角对各个知识点的归类。

TCL心得一

chunka的专栏

06-21

3005

下了windows的安装包。一、在wish85里运行一下简单的测试。e:/tcl/test.tcl%source e:/tcl/test.tcl目录的斜杠方向跟UNIX一样哦。test.tcl 内容proc tgrep {pattern filename } {set f [open $filename r]while {[gets $f line]} {if {[regexp $pattern $line]} {puts stdout $line} else {puts "not found $patte

Tcl学习笔记1

qq_40268672的博客

11-13

2816

Hello world 设置变量为某个字符串 set str "hello world" 打印该变量的值 puts $str 输出如下: 数值与变量 1.计算表达式的值 puts [expr 33+3] 结果为： 36 2.变量的声明和调用定义：set 变量名变量值取值：$变量名变量名可以包含任何字符，长度任意，甚至可以包含空格等特殊字符，但是需要封闭在大括号内。建议变量名以字母或下划线开始，不要包含特殊字符，让代码更加的简洁、规范。有空格的情况： set {array num14}

c-shell 脚本如何再调用另一个tcl脚本时传递变量

最新发布

04-25

<think>好的，我现在需要解决用户的问题：如何在CSH脚本中调用TCL脚本并传递变量。用户希望了解具体的方法，所以我得先理清思路，结合提供的引用内容来找到正确的解决方案。首先，回顾用户提供的引用内容。引用[1]提到在TCL中使用exec命令调用CSH脚本，并传递参数，比如exec csh script.csh arg1 arg2。但用户的问题相反，是要在CSH中调用TCL脚本并传参。所以需要反向思考这个过程。引用[3]中提到，如果在TCL中执行CSH脚本时出现错误，可以用catch处理。而引用[4]则提到TCL脚本可以被C/C++调用，比如用Tcl_EvalFile。不过用户的问题是关于CSH调用TCL，所以可能需要CSH如何执行TCL并传参。通常，在Shell脚本中调用另一个脚本并传递变量，常用的方法是通过命令行参数传递。例如，在CSH中执行tclsh script.tcl arg1 arg2，这样TCL脚本就可以通过$argv变量获取这些参数。但需要确认CSH的语法和TCL的参数处理方式是否正确。另外，引用[2]提到在TCL脚本的第一行加上#!/usr/bin/tclsh，确保可执行。所以在CSH中调用TCL脚本时，可能需要先赋予执行权限，或者直接使用tclsh解释器执行。接下来，具体的步骤应该是： 1. 在CSH脚本中调用TCL脚本时，将变量作为命令行参数传递。例如：tclsh script.tcl $var1 $var2。 2. 在TCL脚本中，使用$argc和$argv来接收参数，其中$argv是参数的列表，$argc是参数个数。 3. 需要注意参数传递时的类型和引用，避免因为空格或特殊字符导致的问题，可能需要用引号包裹参数。可能的例子：在CSH中： set var1 = "hello" set var2 = 123 tclsh myscript.tcl "$var1" $var2 在TCL脚本中： set arg1 [lindex $argv 0] set arg2 [lindex $argv 1] puts "arg1: $arg1, arg2: $arg2" 另外，引用[3]提到如果调用的脚本返回非零退出状态，CSH可能会报错，但这里的问题在于传递变量，可能不需要处理错误，除非执行过程中有问题。但用户的问题主要是传参，所以这部分可能暂时不用考虑。需要验证这种方法是否可行，是否还有其他方法，比如通过环境变量传递。例如，在CSH中设置环境变量，然后在TCL中读取。这可能也是一种方式，但不如命令行参数直接。例如，在CSH中： setenv MY_VAR "value" tclsh script.tcl 在TCL中： set var [info exists env(MY_VAR)] ? $env(MY_VAR) : "" puts $var 但用户的问题是明确要传递变量，可能更倾向于命令行参数，因为更直接，特别是需要传递多个或动态生成的变量时。总结，两种方法：命令行参数和环境变量。需要分别说明，并给出示例。现在需要将这些思路整理成结构清晰的步骤，确保用户能够理解并实施。同时，根据用户提供的引用，可能需要参考exec命令的使用，但这里是反向的情况，所以重点在于CSH如何调用TCL，并传参。另外，引用[4]提到TCL与C的交互，可能不直接相关，但可以忽略。引用[5]中的Tcl_CreateCommand可能也不相关，所以主要参考引用[1]、[2]、[3]中的相关内容，但需要转换视角到CSH调用TCL。最后，生成相关问题，可能需要考虑错误处理、参数处理、其他方法比较等。</think>### 如何在 CSH 脚本中调用 TCL 脚本并传递变量在 C Shell (csh) 脚本中调用 TCL 脚本并传递变量，可通过 **命令行参数** 或 **环境变量** 实现。以下是两种方法的详细步骤及示例： --- #### 方法 1：通过命令行参数传递 **步骤说明：** 1. 在 CSH 脚本中将变量作为参数传递给 TCL 脚本。 2. 在 TCL 脚本中通过 `$argv` 接收参数。 **示例：** 1. **CSH 脚本 (`call_tcl.csh`)**： ```csh #!/bin/csh set var1 = "Hello" set var2 = 123 # 调用 TCL 脚本并传递变量 tclsh myscript.tcl "$var1" $var2 ``` 2. **TCL 脚本 (`myscript.tcl`)**： ```tcl #!/usr/bin/tclsh set arg1 [lindex $argv 0] ; # 获取第一个参数 set arg2 [lindex $argv 1] ; # 获取第二个参数 puts "接收的参数：$arg1, $arg2" ``` **注意事项：** - 若变量包含空格或特殊字符，需用双引号包裹（如 `"$var1"`）。 - 在 TCL 中通过 `lindex $argv n` 按索引获取参数，索引从 `0` 开始[^1][^2]。 --- #### 方法 2：通过环境变量传递 **步骤说明：** 1. 在 CSH 脚本中设置环境变量。 2. 在 TCL 脚本中通过 `$env(VAR_NAME)` 读取环境变量。 **示例：** 1. **CSH 脚本 (`call_tcl_env.csh`)**： ```csh #!/bin/csh setenv MY_VAR1 "Hello" setenv MY_VAR2 456 tclsh myscript_env.tcl ``` 2. **TCL 脚本 (`myscript_env.tcl`)**： ```tcl #!/usr/bin/tclsh if {[info exists env(MY_VAR1)] && [info exists env(MY_VAR2)]} { puts "接收的环境变量：$env(MY_VAR1), $env(MY_VAR2)" } else { puts "环境变量未设置" } ``` **注意事项：** - 环境变量在脚本执行期间全局有效，适合传递敏感数据或配置参数。 - 需确保变量在调用 TCL 脚本前已正确设置[^3][^4]。 --- #### 两种方法对比 | **方法** | **适用场景** | **优点** | **缺点** | |----------------|----------------------------------|------------------------------|------------------------------| | 命令行参数 | 传递少量、动态生成的参数 | 直接、灵活 | 参数较多时管理复杂 | | 环境变量 | 传递配置参数或敏感数据 | 全局有效，避免参数暴露 | 需手动清理，可能影响其他进程 | --- ### 错误处理若 TCL 脚本执行失败（如参数错误），可在 CSH 中通过 `status` 捕获退出状态： ```csh tclsh myscript.tcl arg1 arg2 if ($status != 0) then echo "TCL 脚本执行失败" endif ``` 在 TCL 中，可通过 `exit 1` 返回非零状态码[^3][^5]。 ---