Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- if ( $ch_type ne 'aggregator' ){
- my $tcpport = $CLICKHOUSE_PORTS->{ $ch_type } ->{tcp_port};
- yabs_system("cat $backup_dict_path | perl -pe 's|(<where>BaseNo\\s*=\\s*)\\d+|\${1}$baseno|; s|(<port>)9000|\${1}$tcpport|;' > $dict_file_path", {
- tee => 1
- });
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement