package common_things;

use 5.008008;
use strict;
use warnings;

require Exporter;
our @ISA = qw(Exporter);

my @EXTHDS = (
"/media/disk",
"/media/disk-1",
"/media/disk-2",
"/media/disk-3",
"/media/disk-4",
"/media/disk-5"
);
our %EXPORT_TAGS = ( 'all' => [ qw(
        @EXTHDS
) ] );

our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );

our @EXPORT = qw(
        @EXTHDS
);

our $VERSION = '0.01';

1;