Saiba quanto de energia seu PC gasta aproximadamente por mês
Publicado por Perfil removido (última atualização em 18/12/2013)
[ Hits: 5.746 ]
Consulte os valores da tarifa da sua região e altere no code. :)
#!/usr/bin/perl
# O VALOR DA TARIFA DE ENERGIA VARIA DE CIDADE A ESTADOS E REGIÕES...
# NORMALMENTE O CONSUMO ACIMA DE 100 kWh custa de 40 a 50 CENTAVOS por kWh
# FONTE: ANEEL - Agência Nacional de Energia Elétrica.
# http://www.aneel.gov.br/arquivos/PDF/17-05_materia1_3.pdf
# Potência do aparelho em Watts/1000 x horas de funcionamento x mês (30 dias)
# um computador + monitor gasta cerca de 120 a 150 Watts no caso 120W/1000 = 0,12 kWh
# Com monitor desligado, ECONOMIA de 0,08 kWh
#Micro (CPU - Unidade Central) - 40 a 60 W
#Monitor - 80 a 90 W
#Impressora - 70 a 80 W
#Scanner - 50
#CPU + vídeo (s/ impressora) - 120 a 150 W
#Consumo CPU + Vídeo + Impressora = 0,19 a 0,23 kWh.
#Consumo CPU/vídeo (hora) = 0,12 a 0,15
my @tempo=("uptime");
print "Tempo de funcionamento, (hora:minutos):";system("@tempo | cut -f1 -d ',' | cut -f2 -d 'p'");
print "Informe a quantidade de horas: ";
my $horas = <STDIN>;
print "\n";
$dia = (0.12) *$horas;
print "Você consumiu hoje aproximadamente $dia kWh/dia\n";
$mes = ($dia*30);
print "Neste ritimo irá consumir aproximadamente $mes kWh/mês\n";
print "\n";
$RSmes = ($mes*0.50); # DEFINIDO 0,50 CENTAVOS POR kWh (consulte sua operadora de energia)
print "Previsão em R\$ para o mês: $RSmes R\$ \n";
print "\n";
Escrevendo varias linhas em um arquivo qualquer
Calculando a média entre dois valores
Soma varios valores e mostra sua media
Nenhum comentário foi encontrado.
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Novos apps de produtividade, avanços em IA e distros em ebulição agitam o universo Linux
Como instalar o repositório do DBeaver no Ubuntu
Como instalar o Plex Media Server no Ubuntu
Digitando underscore com "shift" + "barra de espaços"
Como ativar a lixeira e recuperar aquivos deletados em um servidor Linux
Como mudar o nome de dispositivos Bluetooth via linha de comando
O programa assinador digital (1)
PIP3 - erro ao instalar módulo do mariadb para o Python (9)
É normal não gostar de KDE? (8)
dpkg: erro: gatilho de arquivo duplicado chamado pelo arquivo de nome (6)









