TCL语言的特殊数组

Posted

tags:

篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了TCL语言的特殊数组相关的知识，希望对你有一定的参考价值。

参考技术A

Lists就好像是Tcl中的一种特殊的数组。它把一堆东西放成一个集合，然后就像操作一个整体一样的操作它。
Example 6.1:
set simple_list John Joe Mary Susan
puts [lindex $simple_list 0]
puts [lindex $simple_list 2]
Output:
John
Mary
注意list的index是从0开始的
Example 6.2:
set simple_list2 Mike Sam Heather Jennifer
set compound_list [list $simple_list $simple_list2]
puts $compound_list
puts [llength $compound_list]
Output:
John Joe Mary Susan Mike Sam Heather Jennifer
2
Example 6.3:
set mylist Mercury Venus Mars
puts $mylist
set mylist [linsert $mylist 2 Earth]
puts $mylist
lappend mylist Jupiter
puts $mylist
Output:
Mercury Venus Mars
Mercury Venus Earth Mars
Mercury Venus Earth Mars Jupiter
Arrays
Tcl数组在使用前无须定义，大小也不用指定。
Example 7.1:
set myarray(0) Zero
set myarray(1) One
set myarray(2) Two
for set i 0 $i < 3 incr i 1
puts $myarray($i)

Output:
Zero
One
Two
Example 7.2:
set person_info(name) Fred Smith
set person_info(age) 25
set person_info(occupation) Plumber
foreach thing name age occupation
puts $thing == $person_info($thing)

Output:
name == Fred Smith
age == 25
occupation == Plumber
这个例子指出数组的index不需要是数字，其他类型的数据也可以。
Example 7.3:
set person_info(name) Fred Smith
set person_info(age) 25
set person_info(occupation) Plumber
foreach thing [array names person_info]
puts $thing == $person_info($thing)

Output:
occupation == Plumber
age == 25
name == Fred Smith
Strings
字符串是Tcl中最常用的类型，string有很多使用参数，可以参照Tcl手册。使用方法：
string option arg arg ...
Example 8.1:
set str This is a string
puts The string is: $str
puts The length of the string is: [string length $str]
puts The character at index 3 is: [string index $str 3]
puts The characters from index 4 through 8 are: [string range $str 4 8]
puts The index of the first occurrence of letter \\i\\ is: [string first i $str]
Output:
The string is: This is a string
The length of the string is: 16
The character at index 3 is: s
The characters from index 4 through 8 are: is a
The index of the first occurrence of letter i is: 2
Input/Output
Tcl的绝大多数输入/输出是通过puts和gets做到的。Puts命令显示在console上，gets命令从console输入上取得数据，并存储在某个变量中。

MySQl之TCL(数据事务语言)

文章目录

TCL语言

事务

含义

事务：一条或多条sql语句组成一个执行单位，一组sql语句要么都执行要么都不执行

特点：ACID(属性)

  • 原子性:原子性是指事务是一个不可再分的工作单位，事务中的操作要么都发生，要么都不发生。
  • 一致性：事务必须是数据库从一个一致性状态变换到另一个一致性状态。
  • 隔离性:事务的隔离性是指一个事务的执行不能被其他事务干扰，即一个事务内部操作及使用的数据对并发的其他事务时隔离的，并发执行的各个事务之间不能互相干扰。
  • 持久性：指一个事务一旦被提交，它对数据库中数据的改变就是永久性的，接下来的其他操作和数据库故障不应该对其有任何影响。

事务的使用

  • 事务的分类

    • 隐式（自动）事务：没有明显的开启和结束，本身就是一条事务可以自动提交，比如insert、update、delete
    • 显式事务：具有明显的开启和结束

  • 显式事务的使用

    • ①开启事务
      set autocommit=0;
      start transaction;#可以省略

    • ②编写一组逻辑sql语句
      注意：sql语句支持的是insert、update、delete

      设置回滚点：
      savepoint 回滚点名;

    • ③结束事务
      提交：commit;
      回滚：rollback;
      回滚到指定的地方：rollback to 回滚点名;

案例： 演示事务的使用步骤

#开启事务
SET autocommit=0;
START TRANSACTION;
#编写一组事务的语句
UPDATE `accout` SET balance =500 WHERE username ='张无忌';
UPDATE `accout` SET balance =1500 WHERE username ='赵敏';
#结束事务
ROLLBACK
#commit;

当我们使用事务的时候，假如不同的人同时使用同一个数据不久出错了吗？，那我们怎们办呢？

并发事务

  • 1、事务的并发问题是如何发生的？
    多个事务 同时 操作 同一个数据库的相同数据时
  • 2、并发问题都有哪些？
    脏读：一个事务读取了其他事务还没有提交的数据，读到的是其他事务“更新”的数据
    不可重复读：一个事务多次读取，结果不一样
    幻读：一个事务读取了其他事务还没有提交的数据，只是读到的是 其他事务“插入”的数据
  • 3、如何解决并发问题
    通过设置隔离级别来解决并发问题

数据库的隔离级别

  • 一个事务与其他事务隔离的程度成为隔离级别。数据库规定看多种事务隔离级别，不同隔离级别对应不同的干扰程度，隔离级别越高，数据一致性就越好，但并发性越弱。
  • 对于同时运行多个事务，当这些事务访问数据库中相同的数据时，如果没有采取必要的隔离机制，就会导致各种并发问题：
    • 脏读：对于两个事务T1,T2,T1读取了已经被T2更新但还没有被提交的字段之后，若T2回滚，T1读取的内容就是临时无效的。
    • 不可重复读：对于两个事务T1,T2,T1读取了一个字段和，然后T2更新了该字段之后，T1再次读取同一个字段，值就不同了。
    • 幻读：对于两个事务T1,T2，T1从一个中读取了一个字段，然后T2在该表中插入了一些新的行，之后，如果T1再次读取同一个表，就会多出几行。
  • 数据事务的隔离性：数据库系统必须具有隔离并发运行各种事务的能力，使他们不会相互影响，避免各种并发问题。
  • 数据库提供的四种事务隔离级别
隔离级别描述
READ UNCOMMITED(读取为提交数据)允许事务读取未被其他事务提交的变更、脏读，不可重复和幻读的问题都会出现
REAS COMMITED(读取已提交数据)只允许事务读取已经被其他事务提交的变更，可以避免脏读，但不可重复读和幻读的问题仍然可能出现
REPEATABLE READ(可重复读)确保事务可以从一个字段中读取相同的值，在这个事务持续期间，禁止其他事务对这个字段进行更新，可以避免脏读和不可重复读，但幻读的问题仍然存在
SERIALIZABLE(串行化)确保事务可以从一个表中读取相同的行，在这个事务的持续期间，静止其他事务对该表执行插入，更新和删除操作，所有并发问题都可以避免，但性十分低下

Oracle支持的2中事务隔离级别:READ UNCOMMITED，SERIALIZABLE。默认的事务隔离级别READ UNCOMMITED。

Mysql支持4种事务隔离级别。Mysql默认的事务隔离级别为:REPEATABLE READ。

视图

含义

mysql5.1版本出现的新特性，本身是一个虚拟表，它的数据来自于表，通过执行时动态生成。
好处：

1、简化sql语句
2、提高了sql的重用性
3、保护基表的数据，提高了安全性

创建视图

create view 视图名
as
查询语句;

示例:

#①创建
CREATE VIEW myv1
AS

SELECT last_name,department_name,job_title
FROM employees e
JOIN departments d ON e.department_id  = d.department_id
JOIN jobs j ON j.job_id  = e.job_id;


#②使用
SELECT * FROM myv1 WHERE last_name LIKE '%a%';

修改视图

方式一：
create or replace view 视图名
as
查询语句;

示例：

SELECT * FROM myv3 

CREATE OR REPLACE VIEW myv3
AS
SELECT AVG(salary),job_id
FROM employees
GROUP BY job_id;

​ 方式二：
​ alter view 视图名
​ as
​ 查询语句

示例：

ALTER VIEW myv3
AS
SELECT * FROM employees;

删除视图

drop view 视图1，视图2,…;

示例：

DROP VIEW emp_v1,emp_v2;

查看视图

desc 视图名;
show create view 视图名;

示例：

DESC myv3;

SHOW CREATE VIEW myv3;

视图的更新

  • 使用

    • 插入：insert

    • 修改：update

      UPDATE myv1 SET last_name = '张无忌' WHERE last_name='张飞';

    • 删除：delete

      DELETE FROM myv1 WHERE last_name = '张无忌';

    • 查看：select

      SELECT * FROM myv1;

  • 注意：视图一般用于查询的，而不是更新的，所以具备以下特点的视图都不允许更新

    • ①包含分组函数、group by、distinct、having、union、
    • ②join
    • ③常量视图
    • ④where后的子查询用到了from中的表
    • ⑤用到了不可更新的视图

  • 视图和表的对比

创建语法的关键字是否实际占用物理空间使用
视图create view只是保存了sql逻辑(几乎没有)增删改查，一般不能增删改
表create table保存了数据增删改查均可

  • delete和truncate在事务使用中的区别

    delete语句支持回滚，truncate不支持回滚在rollback回滚

变量

变量主要式以下几种

  • 系统变量：
    • 全局变量
    • 会话变量
  • 自定义变量：
    • 用户变量
    • 局部变量

系统变量

说明：变量由系统提供，不是用户定义，属于服务器层面。

注：如果式全局级别，则需要加上global，如果是会话级别，则需要添加session，不加默认式session级别。

使用到的语法：

1、查看所有的系统变量

show [global全局变量]|【session会话变量】 verables;

2、查看满足条件的部分系统变量

show global|[session] variables like ‘%char%’;

3、查看指定的某个系统变量的值

select @@global|[session].系统变量名;

4、为某个系统变量赋值

方式一：

​ set global|[session] 系统变量值=值;

方式二

​ set @@global|[session].系统变量名=值;

全局变量

作用域：服务器每次启动将为所有的全局变量赋值初始值，针对所有会话(连接)有效，但不能跨重启。

实例使用

#1、查看我们所有的全局变量
SHOW GLOBAL VARIABLES;

#2、查看部分全局变量
SHOW GLOBAL VARIABLES LIKE '%char%';

#3、查看指定全局变量的值
SELECT @@global.autocommit;
SELECT @@tx_isolation;

#4、为某个指定的全局变量变量赋值
SELECT @@global.autocommit=0;

会话变量

作用域:用户定义的，使用@符号定义的变量，使用set关键字
在当前用户当次连接有效，只要在本连接中，任何地方都可以使用（可以在结构内部，也可以跨库）

实例使用

#1、查看我们所有的会话变量
SHOW SESSION VARIABLES;
SHOW VARIABLES;
#2、查看部分会话变量
SHOW SESSION VARIABLES LIKE '%char%';
SHOW VARIABLES LIKE '%char%';

# 3、查看指定全局变量的值
SELECT @@session.autocommit;
SELECT @@tx_isolation;

#4、为某个指定的全局变量变量赋值
SELECT @@session.tx_isolation='read-uncommitted';
SELECT @@tx_isolation='read-uncommitted';
#方式二：
SELECT SESSION tx_isolation='read-uncommitted';

自定义变量

说明：变量式用于自定义的，不是由系统的
 使用步骤
 声明
 赋值
 使用(查看比较运算……)

用户变量

作用域：针对于当前会话(连接)有效，同于会话变量的作用域。

语法

#声明并初始化
	赋值操作符   =或:= 
	SET @用户变量名=值;或
	SET @用户变量名=:值;或
	SELECT @用户变量名=值;


#赋值
方式一：通过SET或者 SELECT
	SET @用户变量名=值;或
	SET @用户变量名=:值;或
	SELECT @用户变量名=值;
方式二:通过SELECT INTO
	SELECT 字段  INTO 变量名
	FROM 表
	
	
	
#使用(查看用户变量的值)
SELECT @用户变量值

局部变量

作用域：

 仅仅在定义他的begin end 有效
 应用在begin end 中的第一句话

语法

#声明
DECLARE 变量名 类型;
DECLARE 变量名 类型 DEFAULT 值;

#赋值

方式一：通过SET或者 SELECT
	SET 局部变量名=值;或
	SET 局部变量名=:值;或
	SELECT @局部变量名=值;
方式二:通过SELECT INTO
	SELECT 字段  INTO @变量名
	FROM 表
	
#使用
SELECT 局部变量名;

用户变量与局部变量小PK

作用域定义和使用的位置语法
用户变量当前会话会话的任何地方必须加@符号，不用限定类型
局部变量BEGIN END中只能在BEGIN END中，且为第一句话一般不用加@符号，需要限定类型

简单实例:案例：声明两个变量并赋初始值，求和，打印

用户变量

SET @m=1;
SET @n=2;
SET @sum = @m+@n;
SELECT @sum;

局部变量

由于局部变量需要放在begin end中这里不要演示，就自行领悟去叭。

存储过程与函数

存储过程

含义：一组预先编译好的SQL语句的集合，理解成批处理语句（l类似于Java中的方法）
 1、提高代码的重用性
 2、简化操作
 3、减少了编译次数并且减少了和数据库服务器的连接次数，提高了效率

创建存储过程语法

CREATE PROCEDURE 存储过程名(参数列表)
BEGIN

	存储过程体（一组合法的SQL语句）
END

创建需要注意的点

1、参数列表包含三部分
 参数模式 参数名 参数类型

实例

in stuname varchar(20)参数模式：

in：该参数可以作为输入，也就是该参数需要调用方传入值
out：该参数可以作为输出，也就是该参数可以作为返回值
inout：该参数既可以作为输入又可以作为输出，也就是该参数既需要传入值，又可以返回值

2、如果存储过程体仅仅只有一句话，begin end可以省略
 存储过程体中的每条sql语句的结尾要求必须加分号。
 存储过程的结尾可以使用 delimiter 重新设置
 语法：
  delimiter 结束标记

实例

delimiter $

调用存储过程语法

call 存储过程名(实参列表)

调用in模式的参数：call sp1（‘值’）;
调用out模式的参数：set @name; call sp1(@name);select @name;
调用inout模式的参数：set @name=值; call sp1(@name); select @name;

in实例

# 2、创建带in模式参数的存储过程
# 案例1:创建存储过程实现 根据女神名，查询对应的男神名

DELIMITER ￥#定义结束符
CREATE PROCEDURE myp3(IN beautyName VARCHAR(20))
BEGIN 
	SELECT bo.*
	FROM boys bo
	RIGHT JOIN beauty b ON bo.id = b.`boyfriend_id`
	WHERE b.name = beautyName;
	
END ￥
#调用
CALL myp3('小昭')￥

out实例

DELIMITER ^
CREATE PROCEDURE myp6(IN beautyName VARCHAR(20),OUT boyName VARCHAR(20))
BEGIN
	SELECT bo.boyName INTO boyName
	FROM boys bo
	INNER	JOIN beauty b ON bo.id = b.boyfriend_id
	WHERE b.name = beautyName;
	
END ^

#调用
CALL myp6('小昭',@bName)^

inout实例

DELIMITER ^
CREATE PROCEDURE myp8(INOUT a INT, INOUT b INT)
BEGIN 
	SET a=a*2;
	SET b=b*2;
	
END ^
SET @m=10^
SET @n=20^
CALL myp8(@m,@n)^

查看存储过程

show create procedure 存储过程名;

实例

SHOW CREATE PROCEDURE  myp3;

注：这里不能直接DESC 存储过程名，这个和表的查看不一样，不要混淆！

删除存储过程

drop procedure 存储过程名;

实例

DROP PROCEDURE p1;

注：这个删除时一次最多只能删除一个，需要多删，需要手动一个一个删除。

函数

含义：一组预先编译好的SQL语句的集合，理解成批处理语句
 1、提高代码的重用性
 2、简化操作
 3、减少了编译次数并且减少了和数据库服务器的连接次数，提高了效率

细心的小伙伴发现了这个，咦怎么和存储过程一样呢？博主错了叭！，不，我没错！！！

函数和存储过程的区别

存储过程：可以有0个返回，也可以有多个返回，适合做批量插入、批量更新
函数：有且仅有1 个返回，适合做处理数据后返回一个结果

函数的创建

语法

CREATE FUNCTION 函数名(参数列表) RETURNS 返回类型
BEGIN
	函数体
END

函数创建的注意点

1.参数列表 包含两部分：参数名、参数类型

2.函数体：肯定会有return语句，如果没有会报错
如果return语句没有放在函数体的最后也不报错，但不建议return 值;
3.函数体中仅有一句话，则可以省略begin end
4.使用 delimiter语句设置结束标记

函数的调用

语法

SELECT 函数名(参数列表)

实例一：有参返回

#案例1：根据员工名，返回它的工资
DELIMITER $
CREATE FUNCTION myf2(empName VARCHAR(20)) RETURNS DOUBLE
BEGIN
	SET @sal=0;#定义用户变量 
	SELECT salary INTO @sal   #赋值
	FROM employees
	WHERE last_name = empName;
	
	RETURN @sal;
END $

SELECT myf2('k_ing') $

实例二：无参返回

#案例：返回公司的员工个数
DELIMITER $
CREATE FUNCTION myf1() RETURNS INT
BEGIN

	DECLARE c INT DEFAULT 0;#定义局部变量
	SELECT COUNT(*) INTO c#赋值
	FROM employees;
	RETURN c;
	
END $

SELECT myf1()$

注：若上面的语句在cmd里面执行无什么需要注意的，但假若需要在图形化界面执行，在每次执行时，请顺带执行==DELIMITER $==语句，让我们的程序执行时识别结束符。

查看函数

语法

show create function 函数名;

实例

SHOW CREATE FUNCTION myf3;

删除函数

语法

drop function 函数名;

实例

DROP FUNCTION myf3;

流程控制

流程控制结构主要分为以下三大类:

顺序结构：程序从上往下依次执行
分支结构：程序从两条或多条路径中选择一条去执行
循环结构：程序在满足一定条件的基础上，重复执行一段代码

顺序结构

程序依次执行！！这个没啥好叙述的了。。。

分支结构

分支结构我们在Java中最熟悉的就是if else 还有就是switch case结构了，mysql也又类似之处，一起看看叭。

  • 1.if函数

    语法：if(条件,值1，值2)
功能：实现双分支
应用场景:任何地方

  • if……then结构

    语法：
if 条件1 then 语句1;
elseif 条件2 then 语句2;
....
else 语句n;
end if;
功能：类似于多重if

应用场景:只能应用在begin end 中

  • case结构

    语法：
情况1：类似于java中switch语句，一般用于等值判断
case 变量或表达式
when 要判断的值 then 返回的值1或语句1;
when 要判断的值 then 返回的值2或语句2;
...
else 返回的值n或语句n;
end 

情况2：类似于Java中的多重IF语句，一般用于实现区间判断
case 
when 条件1 then 语句1;
when 条件2 then 语句2;
...
else 语句n;
end 
应用场景:任何地方

循环结构

  • 分类：

    • while→Java中的while
    • loop→Java中的for,但是没有循环题
    • repeat→do while

  • 循环控制

    • iterate 类似Java的continue 继续，结束本次循环，继续下一次
    • leave 类似于 Java的break 跳出，结束当前所在循环

  • while循环详解

语法

【标签:】while 循环条件 do
	循环体;
end while【 标签】;

Java联想：

while(循环条件){

	循环体;
}

实例

# 案例：批量插入，根据次数插入到admin表中的多条记录
DELIMITER $
CREATE PROCEDURE pro_while1(IN insertCount INT)
BEGIN
	DECLARE i INT DEFAULT 1;
	WHILE i<=insertCount DO
		INSERT INTO admin(username,`password`) VALUES(CONCAT('Rose',i),'666');
		SET i=i+1;
	END WHILE;
	
END $
DELIMITER $
  • loop循环
语法：
【标签:】loop
	循环体;
end loop 【标签】;

可以用来模拟简单的死循环
  • repeat循环
语法：
【标签：】repeat
	循环体;
until 结束循环的条件
end repeat 【标签】;

以上是关于TCL语言的特殊数组的主要内容，如果未能解决你的问题，请参考以下文章

TCL脚本语言光速入门教程，一篇就够了（超全查表）

TCL数据类型

tcl之变量-数组array

tcl之变量-unset 简单变量和数组

C语言数组指针&数组名和数组名数组是首元素地址(两特殊情况)数组指针访问二维数组数组指针的使用。

特殊矩阵的压缩存储（C语言）