Manipulação de Arquivos Orientada a Objetos
Publicado por Daniel Vinciguerra (última atualização em 24/02/2016)
[ Hits: 2.831 ]
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; }
Script para adicionar e remover usuários no IMSPECTOR
Desktop Linux ganha fôlego enquanto distros refinam experiência e segurança
Wayland em alta, IA em debate e novos ventos para distros e devices
Qt 6.10 e Python 3.14 puxam o ritmo do software livre nesta quarta
Atualizações de Apps, Desktop e Kernel agitam o ecossistema Linux nesta terça-feira
Como mudar o nome de dispositivos Bluetooth via linha de comando
Adicionando o repositório backports no Debian 13 Trixie
Warcraft II Reforged no Linux? (0)
Erro ao fazer remaster usando Penguin eggs (0)
queria saber como instalar o android power tools igual ao winux no lin... (7)