Print PUSHCOLOR BRIGHT_BLUE "This text is bright blue on green.\n" Print PUSHCOLOR RED ON_GREEN "This text is red on green.\n" Print BOLD BLUE "This text is in bold blue.\n" Print BOLD, BLUE, "This text is in bold blue.\n", RESET Print colored("This is in red.", 'alert'), "\n" Print "Alert is ", coloralias('alert'), "\n" Print "Color string is ", $valid ? "valid\n" : "invalid\n" My $valid = colorvalid('blue bold', 'on_magenta')
Print colorstrip("\e[1mThis is bold\e[0m"), "\n" # Map escape sequences back to color names.
Print colored(, 'Bright red on black.', "\n") Print colored(, 'Red on bright yellow.', "\n") Print colored(, 'Yellow on magenta.', "\n") Print colored("Yellow on magenta.", 'yellow on_magenta'), "\n" Term::ANSIColor - Color screen output using ANSI escape sequences #SYNOPSIS use Term::ANSIColor
0 kommentar(er)
