小编Jul*_*amp的帖子

Perl 脚本无缘无故挂起

所以我有这个小脚本,它检查两个日志文件中的特定行并比较这些行。该脚本用于多个不同的 Windows Bamboo Agent。但在其中之一上它只是挂起并且不退出。由于该脚本在竹子中使用,因此当该脚本不退出时,整个作业将挂起。当我通过远程访问检查计算机并终止脚本时,作业将继续,直到再次到达脚本。

这是由另一个脚本启动的脚本。

#! /usr/bin/perl
my $naluresult = 2;
my $hevcresult = 2;
my $hevcfailed = 0;

use strict;
use warnings;

#---------------------------------------------
#check for $ARGV[0] and $ARGV[1]

open( my $nalulog, "<", $ARGV[1] )
    or die "cannot open File:$!\n\n";
while (<$nalulog>) {
    chomp;
    $_ =~ s/\s+//g;
    if ( $_ =~ m/MD5:OK/ ) {
        $naluresult = 1;
    } else {
        if ( $_ =~ m/MD5:MISSING/ ) {
            $naluresult = 0;
        }
    }
}
close $nalulog;

#---------------------------------------------

open( my $hevclog, "<", …
Run Code Online (Sandbox Code Playgroud)

windows perl

5
推荐指数
1
解决办法
2577
查看次数

根据4个角落获得正方形的中心

我的代码有问题,应该给我一个正方形的中心.正方形在double [] []数组中保存为角.

static double[] getMid(double[][] points){
    double[] mid = new double[2];
    double a = Math.sqrt( (points[0][0] - points[1][0]) * (points[0][0] - points[1][0]) 
                        + (points[0][1] - points[1][1]) * (points[0][1] - points[1][1]) );
    a/=2;
    double c = a / Math.sin(Math.toRadians(45));

    mid[0] = Math.sin(Math.toRadians(45)) * c + points[1][0];
    mid[1] = Math.cos(Math.toRadians(45)) * c + points[1][1];

    StdDraw.point(mid[0], mid[1]);

    return mid;
}
Run Code Online (Sandbox Code Playgroud)

我最初的想法是计算中心和角落的距离,然后用距离和角度计算中心点.当正方形处于正常位置时,这可以正常工作,但是一旦它旋转,中心就会偏离.

点表示计算的中心.

点表示计算的中心.

java math trigonometry

2
推荐指数
1
解决办法
5290
查看次数

标签 统计

java ×1

math ×1

perl ×1

trigonometry ×1

windows ×1