Format pl file

This commit is contained in:
Aoran Zeng 2025-08-07 23:59:07 +08:00
parent 27243a62bc
commit c36be5f59c
No known key found for this signature in database
GPG Key ID: 8F8BA8488E10ED98

View File

@ -2,8 +2,9 @@
# --------------------------------------------------------------- # ---------------------------------------------------------------
# Test File : cli.pl # Test File : cli.pl
# Test Authors : Aoran Zeng <ccmywish@qq.com> # Test Authors : Aoran Zeng <ccmywish@qq.com>
# Contributors : Nil Null <nil@null.org>
# Created On : <2024-06-05> # Created On : <2024-06-05>
# Last Modified : <2025-07-22> # Last Modified : <2025-08-07>
# #
# 测试 chsrc 可执行文件 # 测试 chsrc 可执行文件
# --------------------------------------------------------------- # ---------------------------------------------------------------
@ -43,18 +44,18 @@ like `./chsrc get fake_target_name 2>&1`, $fake_target_name, 'chsrc get fake_ta
if ((defined $ARGV[0]) && ($ARGV[0] eq 'fastcheck')) { if ((defined $ARGV[0]) && ($ARGV[0] eq 'fastcheck')) {
say "Fast checking, done testing."; say "Fast checking, done testing.";
done_testing; done_testing;
exit 0; exit 0;
} }
my $has_ruby = system 'ruby -v'; my $has_ruby = system 'ruby -v';
if ($has_ruby == 0) { if ($has_ruby == 0) {
say "Ruby exists. Go on testing."; say "Ruby exists. Go on testing.";
} else { } else {
say "No Ruby. End testing."; say "No Ruby. End testing.";
done_testing; done_testing;
exit 0; exit 0;
} }
my $get_ruby = qr/gem sources/; my $get_ruby = qr/gem sources/;