摘要: #!/usr/bin/perl -w my $now = `date +%y_%m_%d_%Hh%Mm`; open(FH, "<./eco_changes.tcl") or die "Cant open file $!"; open (OUT,">tempus_from_pt.tcl"); pri 阅读全文
posted @ 2025-11-10 11:15 心随鸥鹭齐舒羽 阅读(9) 评论(0) 推荐(0)