Command actions

umesh_linuxq · 04-09-2012, 05:25 AM

Hi

Anybody please tell me what does this command do , command -> shift // "".

Thanks
Umesh.K

Ajit Gunge · 04-09-2012, 06:03 AM

What are you exactly doing umesh.Can you please put in more information?

umesh_linuxq · 04-10-2012, 12:07 AM

Hi

Here i am trying to understand the Perl code which reads from Oracle spreadsheet. There are so many files in conjunction which achieves the interfacing from Perl to Oracle spreadsheet. This is some portion of the code in one particular file called 'Common.pm'. I have mentioned one of the function in this file.

sub debug
{
my $param = shift // "";
$param = shift if $param eq lpod;
given ($param)
{
when (undef) {}
when (TRUE || FALSE) { $DEBUG = $_; }
default { alert "Wrong argument"; }
}
return $DEBUG;
}

Thanks
Umesh.K

yoK0 · 04-10-2012, 02:51 AM

Not sure what shift does in perl but in bash it lets you for example
loop through the command line arguments.

pan64 · 04-11-2012, 04:26 AM

see the pages of shift and split, it looks like a mixed syntax.

the real solution can be found here: Defined-Or

so

Code:

shift // ""

will return the result of shift if shift was successful, otherwise return "".