Bruno Caricchio Buss brunobuss

## rio-pm-rawsocket
##Packs.pm
package Packs;

use v5.10;
use strict;
use warnings;
use diagnostics;
use Net::RawIP;

sub new {

## .vimrc
syntax on

set tabstop=4
set shiftwidth=4
set expandtab

set nowrap

## dc.pl
use v5.10;
use strict;
use warnings;

my $fname = $ARGV[0];
my $FHi, my $FHo;

open ($FHi, '<', $fname) or die $!;
open ($FHo, '>', $fname . '.out') or die $!;
	##Packs.pm
	package Packs;

	use v5.10;
	use strict;
	use warnings;
	use diagnostics;
	use Net::RawIP;

	sub new {
	syntax on

	set tabstop=4
	set shiftwidth=4
	set expandtab

	set nowrap