Hebraic Style
Publicado por Danillo Souza (última atualização em 03/11/2009)
[ Hits: 3.508 ]
Lê a quantidade de linhas informada e as escreve alinhadas a direita na tela para visualização e grava em um arquivo com essa mesma formatação.
Esse era um dos exercícios de uma maratona de programação, não lembro de onde, mas na maratona era pra ser feito em C.
#! /usr/bin/perl my @a; print "Escrever quantas linhas?: "; $ln = <STDIN>; chomp $ln; system "clear"; open(A, ">>hebraic.txt"); for ($i = 0 ; $i < $ln ; $i++) { $x = <STDIN>; push(@a, $x); system "clear"; foreach $y (@a) { my $c = length $y; print " " x (80 - $c) . $y; } } foreach (@a) { my $c = length $_; print A " " x (80 - $c) . $_; } close(A); exit;
MyBF - Interpretador de BrainFuck
Verificação se utilizador existe ou não
Testando a agilidade do sistema de arquivos
Remover lista de pacotes do Portage
Nenhum comentário foi encontrado.
Atenção a quem posta conteúdo de dicas, scripts e tal (1)
Manutenção de sistemas Linux Debian e derivados com apt-get, apt, aptitude e dpkg
Melhorando o tempo de boot do Fedora e outras distribuições
Como instalar as extensões Dash To Dock e Hide Top Bar no Gnome 45/46
Como Atualizar Fedora 39 para 40
Instalar Google Chrome no Debian e derivados
Consertando o erro do Sushi e Wayland no Opensuse Leap 15
Instalar a última versão do PostgreSQL no Lunix mantendo atualizado
Flathub na sua distribuição Linux e comandos básicos de gerenciamento
ASRock H310CM-HG4 vs Linux (15)
Lançado Ubuntu 24.04 Final (2)
iso de sistema 32 bit em atividade (9)