MySQL - 在每个字段中搜索特定字符

Question

我有一个 mySQL 数据库设置和一个包含多个字段的“联系人”表，用于表示不同的联系信息。这让我感到困惑，但我想出于某种原因，客户在添加到数据库时并不总是将他们的电子邮件信息放在“电子邮件”字段中。有没有一种快速简便的方法可以在每条记录的每个字段中搜索“@”符号？如果没有，有人可以帮我编写一个 perl 行或脚本以在 txt 文件中只保留带有“@”的字符串吗？我计划研究 perl 的数据按摩等，但我现在没有时间。谢谢!

-奥斯汀

Answer 1

当某些列包含 @

时，这将遍历所有行并将结果保存在文件中

#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;
use DBI;

my $dbh = DBI->connect('dbi:mysql:db_name','user','pass')
  or die "Connection Error: $DBI::errstr\n";

my $sql = "select * from table";
my $sth = $dbh->prepare($sql);
$sth->execute or die "SQL Error: $DBI::errstr\n";

open my $fh, ">", "output.txt" or die $!;

while (my $r = $sth->fetchrow_hashref) {
  $r->{$_} =~ /@/ and print $fh "Found '@' in column $_ of row:", Dumper $r
    for keys %$r;
}