[ Create a new account ]
#!/usr/bin/perl @a = @b = ( "%s %s\n", 'a', 'b' ); print sprintf( @a );print sprintf( shift @a, @a );printf( @b );printf( shift @b, @b );
Get More Comments
Reply
Beautiful perl 0 Comments More | Login | Reply /