Uses the system function to clear the screen : system « System Functions « Perl






Uses the system function to clear the screen

      

#!/usr/bin/perl


use warnings;
use strict;

print( "What file would you like to create? " );
chomp( my $file = <STDIN> );

( $^O =~ /Win/ ) ? system( "cls" ) : system( "clear" );

   
    
    
    
    
    
  








Related examples in the same category

1.Using system on Windows
2.Using system on Windows with the Windows START command
3.Using system to call os/shell function
4.stty cbreak </dev/tty >&1
5.system "stty cbreak &1";
6.Using system to call a command passed in by an array
7.Calling system.
8.Read system command and execute
9.The system command executes a command and waits until that command completes.