ensembl-hive
2.8.1
Functions
add_ikmc_as_simple_features.pl File Reference
Go to the source code of this file.
Functions
public
get_filehandle
()
Function Documentation
◆
get_filehandle()
public get_filehandle
(
)
Undocumented method
Code:
click to view
sub
get_filehandle
{
my ($file_name) = @_;
my $io;
my $alt_file_name = $file_name;
$alt_file_name =~ s/\.(gz|Z)$
//;
if
( $alt_file_name eq $file_name ) {
$alt_file_name .=
'.gz'
;
}
if
( !-f $file_name ) {
carp(
"File '$file_name' does not exist, "
.
"will try '$alt_file_name'"
);
$file_name = $alt_file_name;
}
if
( $file_name =~ /\.(gz|Z)$/ ) {
# Read from zcat pipe
$io = IO::File->new(
"zcat $file_name |"
)
or carp(
"Can not open file '$file_name' with 'zcat'"
);
}
else
{
# Read file normally
$io = IO::File->new($file_name)
or carp(
"Can not open file '$file_name'"
);
}
if
( !defined $io ) {
return
undef }
print
"Reading from '$file_name'...\n"
;
return
$io;
}
get_filehandle
public get_filehandle()
ensembl
misc-scripts
mouse_knockouts
add_ikmc_as_simple_features.pl
Generated on Tue Jan 6 2026 13:31:57 for ensembl-hive by
1.8.17