
perl
文章平均质量分 87
答案
这个作者很懒,什么都没留下…
展开
专栏收录文章
- 默认排序
- 最新发布
- 最早发布
- 最多阅读
- 最少阅读
-
使用Alfred + Gitee搭建免费图床
使用Gitee实现图床功能, 使用Alfred实现图片上传工具.原创 2023-01-02 21:28:50 · 718 阅读 · 1 评论 -
程序员的算法趣题Perl版
做做题~学学perl~第一题: 求大于10的回文数,要求该回文数的二进制和八进制都必须为回文数; 注:回文数:12321, 14541, 1001001类似这样的数字。答案:585 1001001001原创 2017-09-30 15:32:03 · 1366 阅读 · 1 评论 -
perlipc中文
NAME 命名 perlipc - Perl interprocess communication (signals, fifos, pipes, safe subprocesses, sockets, and semaphores)perlipc-perl进程间通信(signals, fifos, pipes, safe subprocesses, sockets, and semaphore翻译 2017-08-30 11:09:04 · 488 阅读 · 0 评论 -
程序员的算法趣题Perl版 (二)
竟然一月一更。。。第四题 假设一根木棒n厘米,需要切分为一厘米长的木棒,每根木棒只可以一个人切,木棒切成两根可以两个人切; 求:n厘米长木棒,m个人最少要切几次,比如n=8,m=3,则需要切4次。#! perl#20170930#use strict;sub cut { my $barLength = @_[0]; my $num = @_[1]; my $current原创 2017-11-01 10:25:44 · 491 阅读 · 0 评论 -
程序员的算法趣题Perl版(三)
第七题将日期写成YYYYMMDD的形式,然后转换成二进制,并逆序排列,然后再转换成十进制,如果与之前的日期相等则正确。查找1970-01-01到2020-07-24之间正确的日期。#! perl#20171108use Date::Parse;use strict;my $startTime = "1 Jan 1970";my $endTime = "24 Jul 2020";my $star原创 2017-11-16 11:34:06 · 751 阅读 · 0 评论 -
程序员的算法趣题Perl版(四)
间隔的时间有点长,但是我并没有放弃啊同志们~~~好吧,只有我自己看。。。第十一题 用斐波那契数列中的每一个数除以其数位上所有数字之和,求出能整除的数。我这里设置的范围是前1000个数字。#! perl# 20180108# this program is used to find out some numbers in Fibonacci , and the numbers ca原创 2018-01-16 16:24:29 · 581 阅读 · 0 评论