Gravar CDROM
Publicado por Fábio Berbert de Paula 27/02/2003
[ Hits: 4.806 ]
Homepage: https://fabio.automatizando.dev
Script usado para gravar dados em CDROM. Você pode passar como argumentos uma imagem ISO ou uma lista de diretórios para o mesmo.
#!/usr/bin/perl -w sub linha { print "\n"; print "#" x 70 . "\n"; } if ($#ARGV < 1) { linha; print "\nUse:\n\tqueimar -d <lista de diretórios>\n\tou\n\tqueimar -o <imagem.iso>\n"; linha; } else { $flag = shift(); $valor = shift(); linha; if ($flag eq "-d") { while ($tmp = shift()) { $valor = $valor . " $tmp"; } print "Preparando para queimar $valor...\n\n"; print "mkisofs -r -J $valor | cdrecord -v dev=0,0,0 speed=8 -eject -data -"; system("mkisofs -r -J $valor | cdrecord -v dev=0,0,0 speed=8 -eject -data -"); } elsif ($flag eq "-o") { print "Preparando para queimar $valor...\n\n"; print "cdrecord -v dev=0,0,0 speed=8 -data $valor"; system("cdrecord -v dev=0,0,0 speed=8 -data $valor"); } else { print "Ops, opção inválida $flag ! Abortando...\n\n"; exit(0); } print "\n\nTerminei com minha tarefa!\n"; system("eject /dev/cdrom"); linha; }
Índice (Logaritmo Discreto) em Perl
Diminuir ou aumentar o brilho de notebook
Nenhum comentário foi encontrado.
Descritores de Arquivos e Swappiness
tux-gpt - Assistente de IA para o Terminal
Instalação e configuração do Chrony
Programa IRPF - Guia de Instalação e Resolução de alguns Problemas
Como instalar no Linux Jogos da Steam só para Windows
Instalando o Team Viewer no Debian Trixie - problema no Policykit
O Que Fazer Após Instalar Ubuntu 25.04
Graduação e certificação Eng. de redes e Eng. Linux[DUVIDA] (0)
Controle do PS5 no Linux Mint funciona? (3)
Autenticação necessária. um aplicativo quer acesso ao chaveiro "c... (1)