03 tcl提取文件路径操作

最新推荐文章于 2025-03-26 16:17:35 发布
最新推荐文章于 2025-03-26 16:17:35 发布
阅读量8.2k 收藏 42
点赞数 6
CC 4.0 BY-SA版权
分类专栏： tcl 文章标签： tcl
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/qq_43352441/article/details/107733711
本文介绍了TCL语言中处理文件路径的各种操作，包括设置和拆分文件路径、提取文件路径（剔除文件名）、获取文件名以及如何获得当前文件的绝对路径。通过示例详细阐述了每个操作的方法和用法。

摘要生成于 C知道 ，由 DeepSeek-R1 满血版支持， 前往体验 >

03 tcl提取文件路径操作

1 设置和拆分文件路径

(1) 设置文件路径名

格式：

file join dirlist

dirlist ： 路径元素列表，以空格隔开；

返回值：返回dirlist 元素以（== ‘/’==）间隔开的路径名；

范例：

% set path [file join tcl program filename.tcl]    
tcl/program/filename.tcl
% puts $path
tcl/program/filename.tcl

(2) 拆分文件路径名，生成路径元素列表

格式：

file split dirname

dirname：路径名，可包含文件名

以==’/’==作为标志，拆分路径，生成路径元素列表；

返回值：返回dirlist

范例：

% puts $path
tcl/program/filename.tcl
% file split $path
tcl program filename.tcl

2 提取文件路径（剔除文件名）

(1) 格式：

file dirname path

返回路径中最后一个分隔符（’/’）之前的内容

范例：


                

                
                
        

    

    
  


        

            

                      
                        最低0.47元/天 解锁文章
                        

                          
200万优质内容无限畅学

                          
                        

                      
            

        


    



                



	

		

			

				
					
tcl语言读取文件一行_TCL语言（九） 路径和文件

				
			

			

				

					weixin_39855634的博客
				

				

					12-22
					
					1870
					
				

			

		

		

			
				
TCL语言(九)路径和文件(2009-12-28 16:33:33)标签：杂谈~/tcltk$ tclsh% file exists hello3.tcl1% file executable testit0% file pathtype ./hello3.tclrelative% set dir1 homehome% set dir2 brianbrian% set dir3 tcltktclt...

			
		

	



                

            
              



	

		

			

				
					
TCL——访问文件（一）

				
			

			

				

					m0_59557249的博客
				

				

					05-13
					
					6097
					
				

			

		

		

			
				
Tcl 中处理文件和目录的命令是非常重要的，因为在 Tcl 中，文件和目录的处理是非常常见的操作。例如，一个 Tcl 脚本可能需要读取一个配置文件，或者需要创建一个新的日志文件，或者需要遍历一个目录中的所有文件，这些都需要使用文件和目录处理命令。此外，这些命令还可以帮助开发人员更好地管理文件和目录，确保文件和目录的安全性和可靠性。是文件或者目录的完整路径。从根目录开始，一直到文件或者目录的位置。：是文件或目录相对于当前工作目录的路径。来实现，覆盖已存在的文件。的机制，便可实现将一批文件从原来的目录。

			
		

	



              


  
              

                


	

		

			

				
					
tcl脚本获取指定目录下的某个文件

				
			

			

				

					chaihanlin的博客
				

				

					04-30
					
					1248
					
				

			

		

		

			
				
此外，一些操作系统或具体的文件系统可能会对模式匹配的结果影响，例如大小写敏感或不敏感。命令用于对文件名进行模式匹配。它返回与特定模式相匹配的文件和目录名列表。在Tcl（Tool Command Language）中，命令非常类似于大多数Unix shell中的文件匹配。时，需要根据运行环境的具体情况来遵循相关规则。等命令时，就需要手动使用。

			
		

	





	

		

			

				
					
TCL info命令和文件路径提取

				
			

			

				

					笨蛋大乌龟的博客
				

				

					01-16
					
					5292
					
				

			

		

		

			
				
如果当前有脚本文件正在 Tcl 解释器中执行, 则返回最内层处于激活状态的。今天在某个sdc中看到这样一句话，一下子触及到知识盲区了。否则将返回一个空的字符串。

			
		

	



		

			
		



	

		

			

				
					
获取当前脚本绝对路径

				
			

			

				

					奥芝的专栏
				

				

					05-06
					
					971
					
				

			

		

		

			
				
1、Perl脚本

    use File::Spec;
    my $path_curf = File::Spec->rel2abs(__FILE__);
    my ($vol, $dirs, $file) = File::Spec->splitpath($path_curf);
2、shell脚本
#! /bin/sh
filepath=$(cd "$(dirname "$0"

			
		

	





	

		

			

				
					
TCL的file命令

				
			

			

				

					iqifenxia的博客
				

				

					11-10
					
					9971
					
				

			

		

		

			
				
最近，看到redis自己的测试代码，于是简单了解一下，总结一下file命令的简单实用,不废话，上代码


#!/usr/bin/tclsh

set path $argv0

# atime: 以UNIX时间戳形式，返回/设置文件的访问时间
puts "atime: [file atime $path]"

# 返回/设置文件属性信息
puts "attributes: [file attributes $path]"

# 返回单个文件属性信息
puts "attibutes, permission: [

			
		

	





	

		

			

				
					
tcl/tk实例详解——返回一个文件夹下所有文件的绝对路径

				
			

			

				

					dulixin的专栏
				

				

					02-29
					
					1万+
					
				

			

		

		

			
				
#所有代码如下，使用注释的方式讲解脚本#修改好文件夹和保存结果路径，可以把本文件直接拷贝进tcl解释器运行#脚本目的：返回一个文件夹下所有的文件的绝对路径#主要讲述和操作的命令cd、pwd、glob#次要命令：file、open、catch#脚本思想：使用递归返回所有的文件路径，可以遍历到所有的子文件夹#脚本以在window目录下为例，需要在其它系统下请修改路径名#需要返回文件路径的文

			
		

	





	

		

			

				
					
获取当前正在执行的TCl脚本的文件名

				
			

			

				

					gllg1314的专栏
				

				

					06-27
					
					7294
					
				

			

		

		

			
				
variable My_File [file normalize [info script]]
proc test {  } {
  variable My_File
#绝对路径
 set path [file nativename $My_File]
#文件名 
set filename [file tail $path]
 puts $filename
}

			
		

	





	

		

			

				
					
Tcl学习之--文件操作

					
热门推荐

				
			

			

				

					杰瑞的专栏
				

				

					08-09
					
					4万+
					
				

			

		

		

			
				
Tcl中文件名操作遵循Unix/Linux的命名规范.
x/y/z表示x目录下的y 子目录及y下面的子目录z.
~admin/email则表示admin用户的email文件夹.
l  file join命令: -->  文件名联合
在Windows目录下，\\来代表目录分隔。比如\\192.168.0.1\share,则应该写成\\\\192.168.0.1\\share, 如果考虑使用f

			
		

	





	

		

			

				
					
Tcl/Tk--文件操作 

				
			

			

				

					hyw520110的专栏
				

				

					03-29
					
					3449
					
				

			

		

		

			
				
wikibook上的文章很有水平，特翻译出来，晒晒。（译自wikibook，开放书籍库）文件与通道    Tcl除了具有C语言里面的stdio库的功能外，还提供很多其他的文件操作命令，很像shell脚本，虽然比较繁琐。见下面的例子：    glob *.tcl用来列出当前目录下的所有.tcl文件。file copy /from/path/file.ext /to/path.file delete ...

			
		

	





	

		

			

				
					
详解Linux 常用命令 pwd cd的使用

				
			

			

				

					09-15
				

			

		

		

			
				
cd 命令可以说是Linux中最基本的命令语句，其他的命令语句要进行操作，都是建立在使用 cd 命令上的,pwd 命令来查看”当前工作目录“的完整路径。所以说学习linux常用命令，首先学好cd pwd命令的使用方法

			
		

	





	

		

			

				
					
【TCL编程】关于file操作的cmd集合

				
			

			

				

					weixin_30569033的博客
				

				

					11-10
					
					267
					
				

			

		

		

			
				
TCL中一组用于文件处理的命令。file subcommand name arg ...file atime name返回文件的最近存取时间。file dirname name返回name所描述的文件名的目录部分。eg：source [file dirname $argv0]/vxTestCommon.tclfile executable name返回文件是否可被执行。file exists na...

			
		

	





	

		

			

				
					
Tcl 访问文件

				
			

			

				

					xiaoyuzhou1994的博客
				

				

					01-06
					
					2128
					
				

			

		

		

			
				
程序中常有处理文件和目录的需求。如获取文件最后一次访问时间、重命名文件、复制文件、删除文件、读写文件等。

			
		

	





	

		

			

				
					
TCL(Tool Command Language)学习（四）-----文件操作

				
			

			

				

					QUACK_G的博客
				

				

					07-27
					
					2483
					
				

			

		

		

			
				
UNIX 下，会把工作目录变为启动 TCL 脚本的用户的工作目录，WINDOWS 下会把工作目录变为 windows 操作系统的安装目录所在的盘的根目录(如：C:/)将拆分后的结果保存到一个变量中。拆分后的以列表的方式进行存储。

			
		

	





	

		

			

				
					
Tcl常用命令备忘录-访问文件篇

				
			

			

				

					m0_61544122的博客
				

				

					06-08
					
					4478
					
				

			

		

		

			
				
示例解释：以上例子中，我们首先使用open命令打开一个文件，该文件的名字为"output.txt"，操作为写文件（"w"）。第三个例子中，使用file exists检查文件是否存在，如果存在则打开文件，使用read读取文件内容，并输出到控制台。第一个例子中，使用file exists检查文件是否存在，如果存在则输出"文件存在"，否则输出"文件不存在"。如果test.txt存在，则输出"文件存在"，否则输出"文件不存在"。如果test.txt文件存在，则输出文件内容，否则输出"文件不存在"。

			
		

	





	

		

			

				
					
Tcl脚步语言学习

				
			

			

				

					test
				

				

					05-18
					
					2728
					
				

			

		

		

			
				
      发元素的有序集合，各个元素可以是任何字符串，每个元素由空格、制表符或换行符隔开，在使用时通常用花括号将列表表中的所有元素括      发发                                                                                                ...

			
		

	





	

		

			

				
					
tcl/tk实例详解——cd和pwd

				
			

			

				

					dulixin的专栏
				

				

					04-21
					
					8784
					
				

			

		

		

			
				
..    在tcl中cd命令用来改变当前的工作目录，在需要对文件和目录进行操作时是一个必不可少的工具，除非你愿意把所有的文件都无序的放在当前用户目录下。（以下举例以windows系统下为例）    参考cd命令http://blog.csdn.net/dulixin/archive/2008/04/12/2286214.aspx    参考pwd命令http://blog.csd

			
		

	





	

		

			

				
					
Tcl学习笔记(四)——流程控制、过程、命名空间、访问文件

				
			

			

				

					STATEABC的博客
				

				

					05-08
					
					2348
					
				

			

		

		

			
				
Tcl中的流程控制、过程、命名空间、访问文件

			
		

	





	

		

			

				
					
tcl file

					
最新发布

				
			

			

				

					有人说学习`这个`最好的时间是十年前，有人说最好的时间是现在，众说纷纭...
				

				

					03-26
					
					758
					
				

			

		

		

			
				
返回 “dir1/dir2/file.txt”（Unix）或 “dir1\dir2\file.txt”（Windows）file link -symbolic “symlink.txt” “target.txt”;

			
		

	



              




          




        



    





    



      

      

        
      

      





	

		评论	
	

  
	




  

    

      添加红包
      
    

    

      

        
        

          
          
        

        
请填写红包祝福语或标题

      

      

        
        

          
          个
        

        
红包个数最小为10个

      

      

        
        

          
          元
        

        
红包金额最低5元

      

      

        
        

          当前余额3.43元
          前往充值 >
        

      

      

        

          需支付：10.00元
        

        
        
      

    

  





  

    
    
  

  

    
    
  








  

    

      

        

          

            
            
成就一亿技术人!

          

          

        

        

          

          

            领取后你会自动成为博主和红包主的粉丝
            规则
          

        

      

      

        

          

            
              
            
            

              
hope_wisdom
 发出的红包
            

          

        

        

          

          

          

        

      

    

    

  



      
      

      
实付元

      
使用余额支付

      

        

          

            
            点击重新获取
          

        

        
扫码支付

      

      

        
          
            
          
          
        
      

      

        
        钱包余额
          0
          

            
            

              

                
抵扣说明：

                
 1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
 2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

              

            

          

      

      余额充值