#!/usr/bin/perl

# Set the background color to yellow
print(chr(27)."[43m");

# Fill the screen with 'X' characters
print("X"x (40*80));

# Set the background color to normal
print(chr(27)."[0m");
print("\n");