Телеграмм чат группы modernperl страница 8223

16:28пожаловаться #1

VG

Vadim Goncharov in Modern::Perl

Если perl -d тебя не смущает, то дока: https://perldoc.perl.org/perldebguts#Debugger-Internals
Пример:
BEGIN {
no strict;
for my $k (sort keys %main::) {
next if $k =~ m/::\z/;
next if $k !~ m/^_</;

say $k;
print grep defined, @{"$k"};
$|=1;
}
syscall 60, 0; # POSIX::exit(0);
}
запускать через perl -d « название скрипта »

а просто exit вместо syscall по номеру никак?

19:12пожаловаться #2

AG

Тогда проваливается в дебагер

19:12пожаловаться #3

AG

Может можно как-то По другому, не стал заморачиваться

19:13пожаловаться #4

SZ

Sergey Zhmylove in Modern::Perl

Может можно как-то По другому, не стал заморачиваться

Можно послать себе sigkill, это гораздо надежнее, чем делать то, что ты делаешь, потому что номера везде различаются, а sigkill не прокатит только на винде

19:34пожаловаться #5

AS

Alexey Stavrov in Modern::Perl

Если perl -d тебя не смущает, то дока: https://perldoc.perl.org/perldebguts#Debugger-Internals
Пример:
BEGIN {
no strict;
for my $k (sort keys %main::) {
next if $k =~ m/::\z/;
next if $k !~ m/^_</;

say $k;
print grep defined, @{"$k"};
$|=1;
}
syscall 60, 0; # POSIX::exit(0);
}
запускать через perl -d « название скрипта »

Интересно, спасибо!

19:37пожаловаться #6

AG

Sergey Zhmylove

Можно послать себе sigkill, это гораздо надежнее, чем делать то, что ты делаешь, потому что номера везде различаются, а sigkill не прокатит только на винде

Можно зарекварить файлик с номерами сисколов тогда будет работать почти везде

19:40пожаловаться #7

SZ

Sergey Zhmylove in Modern::Perl

Можно зарекварить файлик с номерами сисколов тогда будет работать почти везде

Можно, но зачем :)

19:41пожаловаться #8

AG

Тут обнаружил, что TabSeparated от Microsoft Excel и от mysql это разные форматы и они друг друга не понимают. Никогда не думал, что даже такую простую вещь можно сломать. А еще есть TSV от Clickhouse ...

20:36пожаловаться #9

VG

Vadim Goncharov in Modern::Perl

как и с CSV, есть кучи вариаций

20:37пожаловаться #10

VG

Vadim Goncharov in Modern::Perl

отвратительные форматы