DB<44> use constant {upload =>0b1, getTicket =>0b10, downLoading=>0b100}; DB<45> use warnings; use strict; say my $stats = upload | getTicket | downLoading; 7 DB<46>