SZ
А, думал что-то особенное.
Просто я зафорсил чтобы это была пакетная переменная. А то скорее всего он my создаст, а -n имплиситно будет ее удалять для каждой строки
Size: a a a
2020 December 17
SZ
Dmitry, можно, но так было короче писать, я с мобилы :)
g
Dmitry, можно, но так было короче писать, я с мобилы :)
Понял. )
SZ
Понял. )
Даже лучше без join
SZ
perl -lne 'BEGIN {$, = "\t"} $h{$1} = $2 while /\b(b|d)\b(?:=(\S*))?/g; print $h{d}, $h{b}' file.logVG
Просто я зафорсил чтобы это была пакетная переменная. А то скорее всего он my создаст, а -n имплиситно будет ее удалять для каждой строки
разве однострочник будет без спросу создавать my?
SZ
разве однострочник будет без спросу создавать my?
Почему нет?
SZ
(на самом деле, я не уверен, надо будет в доку залезть)
SZ
разве однострочник будет без спросу создавать my?
Ты прав, без объявления она как our. Старею
SZ
И обращение к my медленнее, чем к пакетной, поэтому лучше без объявления (в общем случае, в некоторых частных му может быть быстрее процентов на 25). Хотя на фоне всего остального можно на всё это забить
NP
Вот скажите ребят, как мне тут сделать чтоб те даты которые 2019 переименовались в old а даты за 2020 переименовались в this
https://perlbanjo.com/bfffd0f4e5
https://perlbanjo.com/bfffd0f4e5
NP
$VAR1 = {
'date' => '01',
'this' => 20,
'old' => 20
};
$VAR2 = {
'old' => 10,
'date' => '02',
'this' => 30
};чтоб так вышло
NP
Вот скажите ребят, как мне тут сделать чтоб те даты которые 2019 переименовались в old а даты за 2020 переименовались в this
https://perlbanjo.com/bfffd0f4e5
https://perlbanjo.com/bfffd0f4e5
https://perlbanjo.com/ce495b0ed4
ну я как бы вот так сделал, работает, просто может кто чё подскажет как было бы это правильнее сделать?
ну я как бы вот так сделал, работает, просто может кто чё подскажет как было бы это правильнее сделать?
AB
https://perlbanjo.com/ce495b0ed4
ну я как бы вот так сделал, работает, просто может кто чё подскажет как было бы это правильнее сделать?
ну я как бы вот так сделал, работает, просто может кто чё подскажет как было бы это правильнее сделать?
Пересмотреть архитектуру и сделать 2020 => {01 => , 02 => }
NP
немного не учёл один момент. теперь вот точно так.
https://perlbanjo.com/10cbacd22e
https://perlbanjo.com/10cbacd22e
АК
И обращение к my медленнее, чем к пакетной, поэтому лучше без объявления (в общем случае, в некоторых частных му может быть быстрее процентов на 25). Хотя на фоне всего остального можно на всё это забить
> И обращение к my медленнее, чем к пакетной
Да как так-то!?
Или это если my «в цикле»?
Да как так-то!?
Или это если my «в цикле»?
VG
можно подумать, без циклов вообще есть смысл что-то бенчить
SP
SP
What is the issue with perl
АК
можно подумать, без циклов вообще есть смысл что-то бенчить
Нет, я имел в виду, если my внутри цикла, а не снаружи его.
Грубо говоря,
против
Грубо говоря,
my $x,$i;
for($i=0;$i<999;$i++){
$x = $arr[$i];
...
}
против
for(my $i=0;$i<999;$i++){
my $x = $arr[$i];
...
}