# 1. open module

{ use open IN =>":crlf", OUT =>":raw"; 
	open IN, "file"; # opens file in crlf mode 
}

open IN,"file"; #opens in in the default mode

# 2. the new open operator
# open FH, MODE, LIST
# usage 

open FH, ">", "somefile" or die "somefile: $!";
print FH "Alabala\n";
close FH;

sub myopen;
myopen ">otherfile";

sub myopen {
	open my $fh, "@_" or die "$!";
	print $fh "Alabala\n";
	# $fh closes implicitly
}