小编mHv*_*vNG的帖子

Python OpenCV 线检测以检测图像中的“X”符号

我有一个图像,我需要在其中检测X行内的符号。

图片:

在此处输入图片说明

正如您在上图中所看到的,X线内有一个符号。我想知道符号的 X 和 Y 坐标。有没有办法在这张图片中找到这个符号,或者它很小?

import cv2
import numpy as np


def calculateCenterSpot(results):
    startX, endX = results[0][0], results[0][2]
    startY, endY = results[0][1], results[0][3]
    centerSpotX = (endX - startX) / 2 + startX
    centerSpotY = (endY - startY) / 2 + startY
    return [centerSpotX, centerSpotY]

img = cv2.imread('crop_1.png')
res2 = img.copy()

cords = [[1278, 704, 1760, 1090]]
center = calculateCenterSpot(cords)
cv2.circle(img, (int(center[0]), int(center[1])), 1, (0,0,255), 30)
cv2.line(img, (int(center[0]), 0), (int(center[0]), img.shape[0]), (0,255,0), 10)
cv2.line(img, (0, …
Run Code Online (Sandbox Code Playgroud)

python opencv image image-processing line

8
推荐指数
1
解决办法
4307
查看次数

Perl找不到对象方法

这是我第一次使用perl(v5.28.1)。我收到错误消息:

'Can't locate object method "load" via stepReader (perhaps you forgot to load 'stepReader')'. 
Run Code Online (Sandbox Code Playgroud)

当我在文件中打印某些内容时,它可以工作,但是以某种方式找不到我的方法。

stepReader.pm在一个子目录中src

**

example.pm

use lib 'src/';
use stepReader;

@ISA = ('stepReader');

my $class = stepReader->load('assets/glasses.STEP');
Run Code Online (Sandbox Code Playgroud)

stepReader.pm

package src::stepReader;

use strict;
use warnings;

sub load {  
    # Variable for file path
    my $filename = @_;
    # Open my file
    open(my $fh, '<:encoding(UTF-8)', $filename)
        or die "Could not open file '$filename' $!";

    # Print the file!
    while (my $row = <$fh>) {
        chomp $row; …
Run Code Online (Sandbox Code Playgroud)

perl

4
推荐指数
1
解决办法
63
查看次数

Perl数组和字符串作为方法参数

我有一个提供两个参数的方法:一个数组和一个字符串。问题是,当我初始化两个不同的变量时,一个用于数组,另一个用于字符串,我在第一个变量中得到数组的第一个元素,在第二个变量中得到第二个元素。我的问题是如何将整个数组存储在一个变量中,将字符串存储在另一个变量中?

Analyze.pm

sub analyze {
    my $self = shift;
    my ($content, $stringToSearch) = @_; 
    # my ($stringToSearch) = @_;
    print "$stringToSearch";
    if (!defined($stringToSearch) or length($stringToSearch) == 0) { die 'stringToSearch is not defined yet! ' }
    foreach my $element ($content) {
        #print "$element";
        my $loc = index($element, $stringToSearch);
        # print "$loc\n";
        given ($stringToSearch) {
            when ($stringToSearch eq "Hi") {
                if ($loc != 0) {
                    print "Searched word is Hi \n"; 
                } else {
                    print "No word found like …
Run Code Online (Sandbox Code Playgroud)

arrays perl

4
推荐指数
1
解决办法
106
查看次数

两个文本编辑器之间的Python缩进错误

我现在在python3中有一个奇怪的问题。

我有一个带有正确缩进的脚本,但是在编译时却说我对制表符或空格的使用不一致。

我正在使用geany,所以在geany中它是正确的缩进,但是当我在vim中打开文件时,这都是错误的。但是,当我在vim中解决问题时,geany都是错误的,编译器会告诉我(geany)哪里出错了。无论哪种方式,我现在都卡住了。

有没有办法解决这个问题?

python indentation

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

Perl命令行参数

我对Perl中的命令行参数有疑问。我不确定是否有人问过这个问题,因为我不确定要搜索什么。

我正在通过一些命令行参数进行应用。但我希望它看起来像这样:stepanalyzer --file=glasses.STEP --get=#62296,#3,#883

所以我可以--get举例。以及如何通过--get

我希望有人能够帮助我。提前致谢!

perl command-line-arguments

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