perl脚本实现批量生成手机号码存放到文件中

最新推荐文章于 2023-03-02 14:19:05 发布
最新推荐文章于 2023-03-02 14:19:05 发布
阅读量763 收藏
点赞数
分类专栏： Perl学习
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/xiexie1357/article/details/39928323
版权
print "Hello World";
open LOG, ">xrs.txt";
print LOG "I love world";
$count=30;
$i=1;
while($i<$count)
{
$i+=1;
$temp=sprintf("%0*s\n",10,$i);
print LOG $temp;
}

close LOG;


运行效果

I love world0000000002
0000000003
0000000004
0000000005
0000000006
0000000007
0000000008
0000000009
0000000010
0000000011
0000000012
0000000013
0000000014
0000000015
0000000016
0000000017
0000000018
0000000019
0000000020
0000000021
0000000022
0000000023
0000000024
0000000025
0000000026
0000000027
0000000028
0000000029
0000000030

xiexie1357
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
JAVA上百实例源码以及开源项目
01-03
Java生成密钥、保存密钥的实例源码，通过本源码可以了解到Java如何产生单钥加密的密钥(myKey)、产生双钥的密钥对(keyPair)、如何保存公钥的字节数组、保存私钥到文件privateKey.dat、如何用Java对象序列化保存私钥,...
JAVA上百实例源码以及开源项目源代码
12-11
Java生成密钥、保存密钥的实例源码，通过本源码可以了解到Java如何产生单钥加密的密钥(myKey)、产生双钥的密钥对(keyPair)、如何保存公钥的字节数组、保存私钥到文件privateKey.dat、如何用Java对象序列化保存私钥,...
Shell脚本实践：如何实现把号码自动保存手机通讯录
inboundmarketing的博客
03-02 353
下面是一个我使用Bash脚本在Linux环境中自动保存号码到手机通讯录的示例脚本。 首先，你需要安装并配置ADB工具，以便使用Bash脚本与Android设备进行交互。 接着你需要确保你的设备已启用USB调试模式，并且ADB工具可以识别你的设备。 下面是实现的代码： #!/bin/bash # 设置变量 name="联系人姓名" number="联系人号码" # 启动通讯录应用 adb shell am start -a android.intent.action.INSERT -t vnd.
perl批量处理文件
G_Spider的专栏
06-15 2751
############################################################################### # fileGs # 功能: 将指定目录下所有.c和.h文件的tab转成空格、删除行尾空字符 # 说明: 此脚本提供了批量处理文件的方法，修改单行线之间的内容可以完成不同的功能 # -------------------------
使用正则表达式匹配中国运营商手机号的正则表达式(不含港澳台地区)
LoveL_T的博客
11-23 2545
匹配手机号码的正则表达式：^1([358][0-9]|4[579]|66|7[0135678]|9[89])[0-9]{8}$ 目前匹配号段 中国电信号段 133、149、153、173、177、180、181、189、199 中国联通号段 130、131、132、145、155、156、166、175、176、185、186 中国移动号段 134(0-8)、135、136、137、138、...
java逐行写入TXT文本之批量生成手机号
jcgjdujdm的博客
06-21 1189
package oata;import java.io.FileWriter;import java.io.IOException;import javax.swing.Spring;public class fikewriter { public static void main(String[] args)throws IOException{ System.out.println("he...
perl 对文件排序经典实例
hendyyou的专栏
11-08 1312
 perl 排序问题【实例】1月份       电话号码             市话      长途      总话费（元）-----------------------------------------------------------------------200809        74889999        3.0        6.6        188200810 
java开源包3
06-28
ftp4j是一个FTP客户端Java类库，实现了FTP客户端应具有的大部分功能文件（包括上传和下 载），浏览远程FTP服务器上的目录和文件，创建、删除、重命，移动远程目录和文件。ftp4j提供多种方式连接到远程FTP服务器包括...
java开源包4
06-28
ftp4j是一个FTP客户端Java类库，实现了FTP客户端应具有的大部分功能文件（包括上传和下 载），浏览远程FTP服务器上的目录和文件，创建、删除、重命，移动远程目录和文件。ftp4j提供多种方式连接到远程FTP服务器包括...
perl创建txt文件并写入内容
去流浪
05-24 8499
参考 http://www.cnblogs.com/modaidai/p/6690839.html #!/usr/bin/perl open d,">1.txt"; print d "hello,world\nsee you\n"; close d;
perl 产生随机数
qiqiaiairen的博客
05-08 1万+
用perl产生随机数 #无参数，返回一个介于0和1之间的值 $num=rand(); #(0,10)的数,大于0而小于10 $num=rand(10); #[0,9]产生一个0到9的整数 $num=int(rand(10)); for($i=0;$i<20;$i++){ $num=int(rand(10)); print $num."\n"; }输出结果：
Shell脚本-批量生成100个账号
walk on the road of linux
06-16 2098
需求： 批量生成100个账号，使用随机密码，并且密码保存在文本中。 #！/bin/bash #定义保存批量生成账号的文件 USER_FILE=./user.info if ! $USER_FILE ;then touch $USER_FILE #生成对应的账号 for USER in USER{1..100}; do pass=$(echo $RANDOM | md5sum | cut -c 1-8) if ! $USER &> /dev/null ;then us
随机生成电话号码保存在txt中并按行读取以及简易抽奖程序
阿昕蜡笔的博客
05-25 756
随机生成电话号码保存在txt中并按行读取 起因是这样的： 要求 1．奖池中电话号码通过文件输入，文件中每一行一个电话号码； 2．在控制台中每 100 毫秒在新行输出一个电话号码，模拟滚动效果； 3．用户单击回车键，停止滚动，输出中奖号码。 4．命令行：python lucky.py filename a) lucky.py 为编写的 Python 代码文件； b) filename 为奖池文件的路径； c) 程序执行结果输出到控制台 stdout； d) 处理文件不存在异常。 5．程序效果： C:\tem
Java 随机生成中文姓名，手机号，邮编，住址
T.Y 专栏
09-20 6115
import java.util.HashMap;  import java.util.Map;      /**  * 随机生成中文姓名，性别，Email，手机号，住址  * @author X-rapido  */  public class RandomValue {      public s
用shell脚本实现生成30个用户名和密码并保存在user.txt文件中
abtgu的博客
10-19 1334
题目： 生成30个用户名和密码并保存在user.txt文件中 要求： 用户名依次为以1为首项2位公差的等差数列密码依次为斐波那契数列 例如： uid：1 password：1 uid：3 password：1 uid：5 password：2 uid：7 password：3 代码： #！/bin/bash #exam01 p=(0 1 1) for((i=1;i<31;i++)) do echo "uid: `expr $i + $i - 1` password: ${p[2]}" &
正则表达式校验手机号
liang08114的专栏
01-30 715
function CheckSJHRegEx(sjh: string): Boolean; var reg: TPerlRegEx; begin reg := TPerlRegEx.Create(); reg.Subject := sjh; reg.RegEx := '1(3|5|7|8)\d{9}'; Result:= reg.Match; FreeAndNil(reg...
正则表达式匹配手机号码
热门推荐
iastro的专栏
06-04 2万+
匹配手机号码的正则表达式：^1([358][0-9]|4[579]|66|7[0135678]|9[89])[0-9]{8}$目前匹配号段中国电信号段133、149、153、173、177、180、181、189、199中国联通号段130、131、132、145、155、156、166、175、176、185、186中国移动号段134(0-8)、135、136、137、138、139、147、15...
perl脚本实现将txt文件内容的行首增加字符0x
最新发布
04-04
以下是一个 Perl 脚本示例，它可以将指定的文本文件内容的每一行的行首添加一个字符 0x： ```perl #!/usr/bin/perl use strict; use warnings; # 打开要处理的文件 my $filename = "example.txt"; open(my $fh, ...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

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

余额充值