Manipulação de Arquivos Orientada a Objetos
Publicado por Daniel Vinciguerra (última atualização em 24/02/2016)
[ Hits: 2.727 ]
Homepage: http://bivee.com.br
Download manipulando-arquivos.pl
Sabemos que Perl não é uma linguagem totalmente orientada a objetos e vejo muitas pessoas dizendo que trabalhar com o paradigma orientado a objetos em Perl é complicado ou que Perl fica impossível de ser lida.
A verdade é que a orientação a objetos em Perl é uma excelente prática e por muitas vezes faz com que seu código fique mais legível e organizado, fazendo com que você consiga reaproveitar seus códigos se você escrever suas aplicações da forma correta.
Abaixo vou mostrar de forma breve e simples como manipular arquivos usando a classe IO::File
#!/usr/bin/env perl # 2016 (c) Daniel Vinciguerra # carrega os pragmas mais comuns use 5.10.0; use strict; use warnings; use IO::File; # constante my $FILE_PATH = 'file'; # iniciando um novo objeto IO::File para escrita my $fout = IO::File->new($FILE_PATH, "w"); if(defined $fout){ # escrevendo no arquivo say $fout "Ola Perl, este é um exemplo de escrita em arquivo!"; $fout->close; } # verificando se o arquivo existe say "Arquivo '${FILE_PATH}' encontrado!" if -e $FILE_PATH; # iniciando um novo objeto IO::File para leitura my $fin = IO::File->new($FILE_PATH, "r"); if(defined $fin){ # lendo do arquivo say <$fin>; $fin->close; }
Processa todos os SlackBuild's
Inserindo sites em Lista do Squid
Eliminando caracteres indesejados
Como aprovar Pull Requests em seu repositório Github via linha de comando
Como gerar um podcast a partir de um livro em PDF
Automatizando digitação de códigos 2FA no browser
Resolver problemas de Internet
Como compartilhar a tela do Ubuntu com uma Smart TV (LG, Samsung, etc.)
Resolvendo o erro "libQt6Widgets.so.6: cannot open shared object file" no Linux
Como instalar protetores de tela (Debian e derivados)
Conheça a 4Devs, caixa de ferramentas online para desenvolvedores
Como converter um vídeo MP4 para um GIF para publicar no README.md do seu repositório Github
Driver de rede realtek 8821ce bugado (1)
Problemas de compartilhame... de impressora no Ubuntu 24.04 (3)