Perl | sqrt() Function

Perl | tell() Function

Last Updated : 07 May, 2019

tell() function in Perl is used to get the position of the read pointer in a File with the use of its FileHandle. If no FileHandle is passed then it returns the position within the most recent accessed file.

Syntax: tell(FileHandle)

Parameter:
FileHandle: Filehandle of the file to be accessed.

Returns: the current position of the read pointer

Example 1:

#!/usr/bin/perl  
   
# Opening a File in Read-only mode  
open(fh, "<", "Hello.txt");  
  
$position = tell(fh); 
print("Position of read pointer before reading: $position"); 
   
# Reading first 10 characters from the file 
for($i = 0; $i < 10; $i++) 
{ 
    $ch = getc(fh); 
} 
  
$position = tell(fh); 
  
# Current position of the read pointer 
print("\nCurrent Position: $position"); 
   
# Closing the File  
close(fh);  

Output:

Example 2:

#!/usr/bin/perl  
   
# Opening a File in Read-only mode  
open(fh, "<", "Hello.txt");  
  
$position = tell(fh); 
print("Position of read pointer before reading: $position\n"); 
  
# Printing First 10 Characters 
print("First ten characters are: "); 
  
# Reading and printing first  
# 10 characters from the file 
for($i = 0; $i < 10; $i++) 
{ 
    $ch = getc(fh); 
    print" $ch"; 
} 
  
$position = tell(fh); 
  
# Current position of the read pointer 
print("\nCurrent Position: $position"); 
   
# Closing the File  
close(fh);  

Output:

Perl | sqrt() Function

C

Code_Mech

Improve

Article Tags :

Similar Reads

Perl | sqrt() Function

Many times it happens that while solving mathematical expressions we require to calculate the square root of a number. To solve this issue, like other programming language Perl provides us with a built-in function sqrt() which can be used to calculate the square root of a number. Syntax: sqrt value

Perl | sleep() Function

sleep() function in Perl is an inbuilt function which is used to delay the execution of the current script for a specified number of seconds or forever if parameter is not specified. The sleep( ) function accepts seconds as a parameter and returns the same on success. Syntax: sleep(seconds) Returns:

Perl | sin() Function

This function is used to calculate sine of a VALUE or $_ if VALUE is omitted. This function always returns a floating point. Syntax: sin(VALUE) Parameters: VALUE in the form of float Returns: Function returns sine of VALUE. Example 1: #!/usr/bin/perl # Calling sin() function $var = sin(5); # Printin

Perl | return() Function

return() function in Perl returns Value at the end of a subroutine, block, or do function. Returned value might be scalar, array, or a hash according to the selected context. Syntax: return Value Returns: a List in Scalar Context Note: If no value is passed to the return function then it returns an

Perl | substr() function

substr() in Perl returns a substring out of the string passed to the function starting from a given index up to the length specified. This function by default returns the remaining part of the string starting from the given index if the length is not specified. A replacement string can also be passe

Perl | values() Function

values() Function in Perl returns the list of all the values stored in a Hash. In a scalar context it returns the number of elements stored in the Hash. Note: Values returned from the value() Function may not always be in the same order. Syntax: values Hash Returns: list of values in the list contex

Perl | rindex() Function

rindex() function in Perl operates similar to index() function, except it returns the position of the last occurrence of the substring (or pattern) in the string (or text). If the position is specified, returns the last occurrence at or before that position. Syntax: # Searches pat in text from given

Perl | prototype() Function

prototype() function in Perl returns a string containing the prototype of the function or reference passed to it as an argument, or undef if the function has no prototype. Syntax: prototype(function_name) Parameter: function_name: Function whose prototype is to be determined Returns: prototype of th

Perl | rand() Function

rand() function in Perl returns a random fractional number between 0 and the positive number value passed to it, or 1 if no value is specified. Automatically calls srand() to seed the random number generator unless it has already been called. Syntax: rand(range_value) Parameter: range_value: a posit

Perl | push() Function

push() function in Perl is used to push a list of values onto the end of the array. push() function is often used with pop to implement stacks. push() function doesn't depend on the type of values passed as list. These values can be alpha-numeric. Syntax: push(Array, List) Parameter: Array: in which