Pular para o conteúdo principal

Postagem em destaque

BlackTDN :: LeetCode :: Comparando Implementações Harbour e TLPP para o Desafio Longest Palindromic Substring

_Créditos das imagens: ChatGPT_ ### LeetCode :: Comparando Implementações Harbour e TLPP para o Desafio Longest Palindromic Substring Resolver o problema do [Longest Palindromic Substring](https://leetcode.com/problems/longest-palindromic-substring/description/) é um exercício clássico de programação, que desafia desenvolvedores a encontrar a maior substring palindrômica dentro de uma string. Recentemente, exploramos soluções tanto em Harbour quanto em TLPP (Total Language Protheus Programming). Neste artigo, comparamos as implementações nessas duas linguagens, destacando suas semelhanças, diferenças e funcionalidades específicas. #### Implementações em Harbour ##### Versão 5.1 Essa solução utiliza a técnica de expansão a partir do centro do palíndromo. Cada caractere ou par de caracteres consecutivos é considerado um possível "centro". O algoritmo expande em ambas as direções enquanto os caracteres forem iguais, retornando o maior palíndromo encontrado. ##### Versão 5....

BlackTDN :: Atualizando o RPO via Batch

Para quem é da antiga e não está muito familiarizado com o Windows PowerShell, segue um exemplo de Batch para a “atualização” do RPO.

considerando:

que o ambiente de compilação possua a seguinte configuração para a chave “SourcePath”:

[compila]

;SourcePath=D:\Totvs\Protheus10\apos\apo_cmp
SourcePath=D:\Totvs\Protheus10\apos\apo_hml
;SourcePath=D:\Totvs\Protheus10\apos\apo_prg

e, no  ambiente de produção:

[environment]

;SourcePath=D:\Totvs\Protheus10\apos\apo_001
;SourcePath=D:\Totvs\Protheus10\apos\apo_002
;SourcePath=D:\Totvs\Protheus10\apos\apo_003
SourcePath=D:\Totvs\Protheus10\apos\apo_004

o “script” para o Batch.

atualiza.bat

@echo off
color 0A
title Conditional copy apos
 
:start
echo What would you like to do?
echo.
echo 1. copiar de apo_cmp
echo 2. copiar de apo_hml
echo 3. copiar de apo_prg
echo.
echo 0. Quit
echo.
 
set /p choice="Enter your choice: "
if %choice%==1 goto cmp
if %choice%==2 goto hml
if %choice%==3 goto prg
if %choice%==0 goto exit
echo Invalid choice: %choice%
echo.
pause
cls
goto start
 
:cmp
cd apo_001
xcopy ..\apo_cmp\*.* /s /c /y /d
cd ..\apo_002
xcopy ..\apo_cmp\*.* /s /c /y /d
cd ..\apo_003
xcopy ..\apo_cmp\*.* /s /c /y /d
cd ..\apo_004
xcopy ..\apo_cmp\*.* /s /c /y /d
cd ..\apo_hml
xcopy ..\apo_cmp\*.* /s /c /y /d
cd ..\apo_prg
xcopy ..\apo_cmp\*.* /s /c /y /d
cd..
goto exit

:hml
cd apo_001
xcopy ..\apo_hml\*.* /s /c /y /d
cd ..\apo_002
xcopy ..\apo_hml\*.* /s /c /y /d
cd ..\apo_003
xcopy ..\apo_hml\*.* /s /c /y /d
cd ..\apo_004
xcopy ..\apo_hml\*.* /s /c /y /d
cd ..\apo_cmp
xcopy ..\apo_hml\*.* /s /c /y /d
cd ..\apo_prg
xcopy ..\apo_hml\*.* /s /c /y /d
cd..
goto exit

:prg
cd apo_001
xcopy ..\apo_prg\*.* /s /c /y /d
cd ..\apo_002
xcopy ..\apo_prg\*.* /s /c /y /d
cd ..\apo_003
xcopy ..\apo_prg\*.* /s /c /y /d
cd ..\apo_004
xcopy ..\apo_prg\*.* /s /c /y /d
cd ..\apo_cmp
xcopy ..\apo_prg\*.* /s /c /y /d
cd ..\apo_hml
xcopy ..\apo_prg\*.* /s /c /y /d
cd..
goto exit

:exit
color 0f
echo.
pause
cls
exit

[]s
иαldσ dj

Comentários

  1. E aí Naldo, blz? Cara, algumas pessoas já me perguntaram o que é o PowerShell para que serve e como usá-lo, será que não vale um tópico sobre este assunto? Abraços. Rleg.

    ResponderExcluir
  2. Hehehe.. fala ae Lee!!!!
    Quem é das antigas sempre re-abre o velho bau do tesouro! Abraço

    ResponderExcluir
  3. De fato. Vambora desvendar o PowerShell e mostrar a maravilha que é e as mágicas que podemos fazer ao dominá-lo. Dominando-o dominamos o SO.

    []s
    иαldσ dj

    ResponderExcluir
  4. E aí Rleg! Os exemplos em PowerShell foram o suficiente?

    []s
    иαldσ dj

    ResponderExcluir

Postar um comentário

Postagens mais visitadas