描述
此函数将 DIRHANDLE 内的当前位置设置为 POS。 POS 的值必须是先前由telldir 返回的值。
seekdir() 函数类似于 Unix seekdir() 系统调用。
用法
以下是此函数的简单语法 -
seekdir DIRHANDLE, POS
返回值
此函数在失败时返回 0,成功时返回 1。
示例
以下是显示其基本用法的示例代码,在 /tmp 中创建一个目录 testdir -
#!/usr/bin/perl -w
opendir(DIR, "/tmp");
print("Position without read:", telldir(DIR), "\n");
$dir = readdir(DIR);
print("Position after one read:", telldir(DIR), "\n");
print "$dir\n";
seekdir(DIR,0);
$dir = readdir(DIR);
print "$dir\n";
print("Position after second read:" , telldir(DIR), "\n");
closedir(DIR);
执行上述代码时,会产生以下结果 -
Position without read:0 Position after one read:4 . . Position after second read:4
相关用法
- Perl setpriority用法及代码示例
- Perl semget用法及代码示例
- Perl send用法及代码示例
- Perl setpwent用法及代码示例
- Perl sethostent用法及代码示例
- Perl setgrent用法及代码示例
- Perl setsockopt用法及代码示例
- Perl setprotoent用法及代码示例
- Perl setnetent用法及代码示例
- Perl semctl用法及代码示例
- Perl semop用法及代码示例
- Perl setservent用法及代码示例
- Perl select用法及代码示例
- Perl sin()用法及代码示例
- Perl split用法及代码示例
- Perl shmctl用法及代码示例
- Perl splice用法及代码示例
注:本文由纯净天空筛选整理自 Perl seekdir Function。非经特殊声明,原始代码版权归原作者所有,本译文未经允许或授权,请勿转载或复制。