C语言写了一个小程序，统计输入字符串长度的。函数调用不太会，请大侠帮忙调试一下

#include<stdioh>//头文件只需要这个
int strll(char str );   //函数名字不能用strlen否则不会出结果的 strlen是内置函数
int main()
{
char astr;//应该为指针
astr = "abc";
strll(astr);    //指针直接过去 不必再加寻址符
return 0;
}
int strll(char str )
{
int length = 0;
while( str++ != '\0')
length +=1;
printf("length = %d\n",length);
return length;
}

帮你改好了  按照你的改的，主要有几个部分函数名字不能用strlen 否则会有重复声明的报警和错误。strlen为内置函数。  开始声明 astr应该为指针类型，要不不能赋值字符串

微信版本升级后，打开微信，点击底部的“发现”这个菜单项，就会发现升级后的“发现”菜单里，增加了“小程序”这样一个功能。
2点击打开小程序后，可以看到有附近的小程序和我的小程序，附近的小程序是所在定位周边的小程序。
下面的小程序列表可以看到的是我们之前打开过的一些小程序，如果有自己觉得很好用的小程序就可以点击左上角，添加到我的小程序里面。
3微信小程序还有具有搜索功能，打开搜索页面可以输入想要找的小程序。

#!/usr/bin/perl -w
use strict; #使用 strict 校验语法
my $file=shift;  #读取执行程序时的第一个参数作为变量 $file 这里应该是指文件名
open IN,$file; 
while(my $line=<IN>){  #打开并读取文件的内容
chomp($line);  #去掉每一行结尾的换行符
my $t2=$line=~tr/ATGC/TACG/;  #统计这一行中ATGC的次数 他程序有问题 应该是 $t2=($line=~s/ATGC/TACG/g);
print $t2,"\n";   #输出次数结果
}

试了一下 他这个程序有问题 是统计每一行的ATGC的出现次数 而且不对, 不应该用tr,, 应该用s

我改了一下

#!/usr/bin/perl -w
my $file=shift;
open IN,$file;
my @line=<IN>;  #读取整个文件到数组
my $lines=join("-",@line);  #把数组合并成一个字符串
my $t2=($lines=~s/ATGC/TACG/g);  #在这个大字符串中统计ATGC出现的次数
print "$t2\n";

我这个是统计整个文件中ATGC出现的次数的

在我的下载器上运行了一下 貌似没问题

root@Nas:~# cat atxt
ATGC
111ATGC222
111222ATGC ATGC
TACG
root@Nas:~# 
root@Nas:~# /testpl atxt
4
root@Nas:~#

用小程序填写填写顺序统计时间的方法如下：
1、在小程序中打开填写顺序统计页面，点击开始按钮，开始填写任务。
2、每完成一个任务，点击完成按钮，系统会自动记录任务完成时间。
3、继续填写下一个任务，以此类推，当所有任务都完成后，点击结束按钮，系统会自动计算并显示填写任务总时间。

---